在VBA Sub中使用函数
是指在VBA的子程序中调用函数来实现特定的功能。VBA（Visual Basic for Applications）是一种用于宏编程的语言，常用于Microsoft Office套件中的应用程序，如Excel、Word和Access等。
使用函数可以使VBA代码更加模块化和可重用。通过调用函数，可以将一些常用的操作封装起来，以便在不同的子程序中重复使用，提高代码的效率和可维护性。
在VBA Sub中使用函数的步骤如下：
- 定义函数：在VBA代码中，使用Function关键字来定义函数，指定函数的名称、参数和返回值类型。例如，下面是一个计算两个数之和的函数的定义：
Function AddNumbers(num1 As Integer, num2 As Integer) As Integer
AddNumbers = num1 + num2
End Function- 调用函数：在需要使用函数的地方，通过函数名和参数列表来调用函数，并将返回值赋给一个变量或直接使用。例如，在一个Sub中调用上述定义的函数：
Sub CalculateSum()
Dim result As Integer
result = AddNumbers(5, 3)
MsgBox "The sum is: " & result
End Sub在上述代码中，调用了AddNumbers函数，并将返回的结果赋给result变量，然后通过消息框显示结果。
函数的优势在于可以将复杂的逻辑封装成一个函数，提高代码的可读性和可维护性。同时，函数可以接受参数，使其更加灵活，适应不同的需求。
在云计算领域中，VBA的使用相对较少，更常见的是使用其他编程语言和工具来进行云计算相关的开发和管理。腾讯云提供了一系列云计算产品和服务，如云服务器、云数据库、云存储等，可以满足不同场景下的需求。具体的产品介绍和链接地址可以参考腾讯云官方网站：https://cloud.tencent.com/
相关·内容
我有一个MMM格式的月份名称，例如Mar，我想将其转换为VBA格式的数字。 在Excel中，您可以使用公式=Month("Mar"&1)得出3 但是，以下代码在VBA中不起作用：Application.WorksheetFunction.Month("Mar" & 1) 我知道这在VBA中有效，但我很好奇为什么上面的快捷方式不起作用？：Month("01/" & "Mar" & "/2020") 是否有一些WorksheetFunctions被排除在VBA之外？
浏览 13提问于2020-03-29得票数 0
回答已采纳
1回答
在我的Excel电子表格中，我希望通过VBA将来自Cell A1的单元格引用插入到Cell B1中。
最后，电子表格应该如下所示：
A B
1 A1
2
3
4
Cell B1是通过运行一个从Cell A1获取单元格引用的VBA来填充的。
我尝试了以下VBA，但无法使其工作(运行时错误1001)：
Sub test()
Sheet1.Range("B1").Value = Sheet1.Range(Sheet1.Range("A1").Value)
End Sub
为了解决我的问题，我需要在我的VBA中改变什么？
浏览 1提问于2018-07-04得票数 1
回答已采纳
1回答
我在想，是否有可能在Excel VBA中设置主工作簿，并在所有过程和函数上访问它？ 因为我是VBA的新手，所以我不了解VBA使用的语法。 Dim MasterWB as Workbook
Set MasterWB = Workbooks.Open("Path to my Workbook") 但是，如果我想在另一个过程或函数中访问它，我会得到一个对象定义错误。 我不想在每个Sub或Function中声明对象。非常感谢!
浏览 16提问于2019-05-27得票数 0
回答已采纳
5回答
我需要在VBA中创建一些需要相互引用的自定义对象，我有一些问题。
首先-对象构造函数在VBA中是如何工作的？有构造函数吗？
第二--有析构函数吗？VBA如何处理对象生命周期的结束？如果我有一个引用其他对象的对象(这是他们唯一的引用)，那么我是否可以将它设置为Nothing并使用它，或者这会导致内存泄漏？
这种准面向对象的东西有点让人恼火。
浏览 2提问于2009-02-20得票数 26
回答已采纳
2回答
我正在尝试让一些代码在Excel VBA和VB.Net之间工作。我在Visual Studio的VB.Net中有以下代码。
Public Class ThisAddIn
Private Sub ThisAddIn_Startup() Handles Me.Startup
End Sub
Private Sub ThisAddIn_Shutdown() Handles Me.Shutdown
End Sub
Public Function Multiplication()
Dim activeWorksheet As Excel.
浏览 7提问于2014-06-02得票数 3
我有一本VBA的excel手册。当一个错误被触发时，我尝试关闭整个Excel应用程序。但我发现Excel会话仍在Windows任务管理器中运行。因此，在正确重启应用程序并运行VBA程序之前，我必须终止会话。
我如何处理错误，以便即使出现错误，我仍然可以运行VBA程序，而无需终止和重新启动Excel本身？
浏览 2提问于2013-03-07得票数 2
5回答
我如何告诉VBA选择A9中的任何内容，使用A9中的值(即B5)，然后转到B5并插入一个值22 (在B9中)。
输出应该如下所示：
22值插入到B5中。我是否可以使用excel公式或VBA编程语言来完成这个任务？
浏览 0提问于2015-02-26得票数 0
回答已采纳
1回答
我想在一个精确的在线数据源上从Excel的VBA代码中运行一些Invantive SQL语句。
我可以使用UDF函数调用，如：
I_SQL_SELECT_SCALAR("select fullname from me")
在Excel表格中。
如何从VBA内部检索全名？
浏览 4提问于2017-11-16得票数 1
回答已采纳
2回答
我试图理解VBA作用域类型，这在VBA中是不可能的，但在其他语言(java、scala等)中是可能的：
public sub try()
dim myVar as String
myvar = "hello world"
Call displayVar()
end sub
public sub displayVar()
msgbox (myvar)
end sub
你能给我一些关于这种有限作用域的信息吗？它是动态的还是词汇的，我真的不太明白其中的区别:/
浏览 3提问于2012-01-06得票数 3
回答已采纳
3回答
我创建了一个排序函数，允许根据某个对象属性对自定义对象的实例集合进行排序。是否可以在VBA中扩展现有的集合类？我不相信在VBA中支持继承，所以我不确定如何以正确的方式来做这件事。我可以创建一个新模块，并将函数放在该模块中，但这似乎不是最好的方法。
浏览 1提问于2009-11-19得票数 5
回答已采纳
我试图将一些vba代码放在一起，以检查从L2到最后一行数据(直到找到空白单元格)的每个单元格中的内容是否不包含字符串'8254‘，列L中的数字代码长27个字符，并且始终包含'8254’作为最后4位数字。因此，如果我可以在每个单元格中验证'8254‘，那么格式/代码是正确的(一些数字代码是不正确的，需要调查)。如果字符串'8254‘不存在于一个或多个单元格中，则显示MsgBox警告列中存在错误。
我一直在努力使下面的代码工作，但是我对vba还是新手，需要一些帮助。
有人知道我是怎么做到的吗？
谢谢
Sub CheckCodes()
'Check colu
浏览 3提问于2015-07-05得票数 0
回答已采纳
1回答
我在VBA上写了一个非常简单的Ceaser密码加密算法。它接受一个字符串值并应用x移位。
对此很满意。不过，我想把它带到下一步，但我不确定它是否可行。
我想在另一个模块中调用这个加密函数，并传递一个字符串值进行加密。
我想做的就是这样
Private Sub Encryption()
'Encryption method of string Var
End Sub
Private Sub function()
Dim Text as String
Text = "Hello"
Encryption(Text)
End Sub
因此，在这个例子中
浏览 0提问于2018-08-22得票数 1
回答已采纳
我有一些文本字段和一个按钮的Access表单。有没有可能用Access表单中传递的参数来执行VBA函数:单击按钮？我知道我可以执行宏，但这并不能解决我的问题。我需要执行VBA。提前谢谢。
浏览 2提问于2009-10-01得票数 0
回答已采纳
1回答
我正在尝试从excel vba获取已经打开的数据库的记录集。在daoDB变量中获取打开的db的引用。我的excel vba代码
Public Sub getdatafromaccess1()
Dim daoDB As DAO.Database
Dim daoQueryDef As DAO.QueryDef
Dim daoRcd As DAO.Recordset
'Here i want to reference to already opened database instead of opening
Set daoDB= OpenDatabase("C:\temp\sa
浏览 3提问于2014-04-08得票数 0
回答已采纳
6回答
我正在编写一个VBA函数，我希望在同一文档中的其他VBA模块中可以公开使用它，但是我不希望它作为UDF (用户定义函数)可用。
但是，如果我使用public access修饰符，我的函数也可以作为一个UDF公式使用，它可以从工作簿中的单元格调用。我不想这样。
是否有访问修饰符或其他方法可以帮助我获得这种“仅限VBA”行为？
亲切的问候
浏览 0提问于2012-06-22得票数 8
4回答
VBA中的链式赋值
、、、
像C/CPP/CSharp/JScript一样，我们如何在VBA中进行链式赋值？也就是说，VBA是否具有赋值算子的右结合性？
例如，在C-sharp和JavaScript中，我们可以使用：
var alpha, bravo, charlie;
alpha = bravo = charlie = "hello";
现在，在VBA中编写此表达式必须：
Dim alpha, bravo, charlie
alpha = "hello"
bravo = "hello"
charlie = "hello"
但我们不能使用：
Dim alph
浏览 1提问于2012-07-20得票数 4
回答已采纳
2回答
许多具有键-值对的组合框
、、、
在sheet2中，我有数据键值。例如：
1 Thomas
2 Michael
在sheet1中，我会有带有项(键)的组合框。如果我从组合框中选择，例如，按1键，然后在组合框旁边(在单元格中)，我将看到值Thomas。使用VBA很容易，但我需要很多这样的组合框。因此，如果我使用VBA，那么对于每个组合框，我必须复制相同的VBA代码。
没有VBA，我们能做到这一点吗？我们可以使用任何公式吗？你有什么想法吗？如果不是，我如何在所有的组合框中使用VBA中的代码？
浏览 0提问于2014-02-03得票数 0
3回答
我正在尝试制作一些VBA表单并计算一些简单的值，但我不明白为什么VBA不能识别Sin()和Cos()函数。例如:我编写了Int()，VBA将其转换为int()，但它不会对sin和cos执行相同的操作。此外，在我尝试编译我的代码之后
Private Sub btn_exit_Click()
Unload laborator_2
End Sub
Private Sub btn_start_Click()
today.Caption = Date
rnb_val.Caption = Int(Rnd * 90 + 1)
sqrt_val.Caption = S
浏览 4提问于2014-02-24得票数 0
2回答
我有这个excel公式，它查找在另一列中找不到的项，并根据结果写出“是”或“否”。除了在excel中使用vba之外，我还能做同样的事情吗？
=IFERROR(IF(MATCH(B2,$A:$A,0),"yes",),"no")
我是vba和excel的新手，任何帮助都是非常感谢的。
浏览 2提问于2014-11-28得票数 0
回答已采纳
1回答
我正在尝试在Word文档中开发一个动态用户表单，该表单将创建一个具有通用名称的ActiveX单选按钮，然后重命名该创建的单选按钮，使其具有基于其在表单中的位置的特定编号。
到目前为止，我相信我已经有了编写代码的所有组件，因为我能够创建按钮。我通过使用VBA导入一个具有已定义radioButtonX名称的单选按钮的快速部件来创建该按钮，例如，我能够将该单选按钮的name属性更改为radioButton1。我遇到的问题是，我的代码将插入带有通用radioButtonX名称的快速部分，然后无法更改单选按钮名，因为它说radioButtonX不存在。但是，在插入radioButtonX之后，我可以手动
浏览 2提问于2016-03-20得票数 0
回答已采纳
3回答
更改列中数值的符号
、、、、
我在D栏中有数据。
列D1中有一个标头，D2向下有一个数值。我希望选择D列中的所有数值(值的数目未知)，并将它们乘以-1 (替换D列中的当前值)。我将如何通过VBA代码做到这一点？
如果我可以在Excel中使用公式，我只需将公式D2*-1向下拖动；但是，我需要VBA等效的公式。
浏览 11提问于2015-11-30得票数 1
回答已采纳
我的excel VBA中有三个模块。我的主要计算是用module1编写的，我想像这样(简化)从module2调用subs：
module1：
sub sub_a()
'some syntaks here
call sub_b()
sheet1.cells(1,1)=a
end sub
module2：
sub sub_b()
a=5
end sub
问题是:为什么在sheet1.cells(1,1)中a值不出来？怎么了？
浏览 5提问于2014-02-03得票数 0
回答已采纳
3回答
在VBA中，我希望能够使用通用表达式引用特定函数，并在另一个函数中引用变量，如下所示： Function simpletest()
i = 1
simpletest = doom"i"
End Function
Function doom1()
doom1 = success
End Function 在VBA中这是可能的吗?如果可能，我应该如何继续？
浏览 5提问于2020-03-27得票数 0
我知道我可以使用键盘快捷方式在excel中运行一个VBA脚本，这样我就可以将我的python代码打包成一个用户定义的函数，然后通过VBA调用它，但这是不雅的。
有更好的方法吗？
浏览 3提问于2014-01-16得票数 1
回答已采纳
1回答
在vba中，我需要检查SaveAs操作是否成功？
Sub saveBookAs()
wb.SaveAs fileName:="newFile"
End Sub
浏览 6提问于2013-11-26得票数 3
回答已采纳
2回答
我很难弄清楚如何使用VBA在消息框中只识别用户的名字。我有一个代码提示工作簿上的一个消息框打开，允许根据用户名使用application.username进行管理访问
我想让它更个性化一点，只需一个问候用户的名字。我知道使用left()和find()的公式可以很容易地做到这一点，但是我不知道如何在VBA中转换它。
非常感谢你的帮助
浏览 2提问于2016-11-29得票数 0
回答已采纳
4回答
我试图在VBA中做一个拷贝，作为一个更大的宏的一部分，所以它需要在VBA中，一个特定工作表中未知的范围。
如果我在工作表中，我有这样的代码：
Sub Copy()
Range("O2", Range("O" & Cells(Rows.Count, "A").End(xlUp).Row)).copy
End Sub()
下面有一个特定范围的工作：
Sub Test()
Worksheets("Data").Range("O2:O10").Copy
End Sub()
如何使第二段代码不特定地工作。
谢
浏览 1提问于2018-09-28得票数 1
回答已采纳
我想要做的是从另一个来源复制一个表，Navision，并将它粘贴到excel中，给出它的格式等等。“复制”过程并不重要，知道如何使其自动化是很好的，但这不是我的首要任务。
复制什么：：
-有7列和来自Navision的可变行的表
存在的问题：
-粘贴没有定义行的表✓(谢谢Ionestorm)
- VBA无法识别剪贴板中的信息。
我认为主要的问题是：
- --我想它是在“外部剪贴板”中复制的，而vba不认识它。
您应该知道我是VBA的新手，我只有C++和basic MySQL的背景，这是我第一次对在日常任务中应用这些知识感兴趣，使他们更容易。我一直在做实验。
我在VBA中找到的有关复制粘贴的信息
浏览 3提问于2016-06-27得票数 0
回答已采纳
1回答
在vba中使用=sum(number，string)函数求和单元格有问题。
下面是一个在普通excel中工作的示例：sum(5，A1)
但是它不能通过VBA公式工作--要求一个数字而不是一个字符串。在VBA中有使用=sum(5，A1)的方法吗？
浏览 1提问于2018-05-16得票数 1
回答已采纳
2回答
我正在寻找一种比较VBA中两个字符串变量的方法。我使用的当前语句(没有产生预期的结果)是：
If Variable1 = Variable2 Then...
我有一个VBA宏，它在代码的第一部分中分配两个变量：
Dim Variable1 as String Variable1 = Left(Range("$F$3").Value, 4)
Dim Variable2 as String Variable2 = ("SheetName.B15")
我试过使用以下语句，但仍然不能正确工作：
If Variable1 Like Vari
浏览 2提问于2013-06-05得票数 0
回答已采纳
我正在创建一个Word模板，在初始化Document_New时执行一系列操作。例如，我在一个子子中从一个XML文件中提取和应用自定义文档属性，并在第二个子子中引用它们。
我正在尝试添加一些错误处理，以使用错误消息关闭文档，并阻止其余的VBA运行，我可以达到文档关闭的程度，但其余的VBA代码将继续执行。理想情况下，我只需要关闭这个新文档(其他单词文档可能在设备上打开)，并停止对VBA的任何处理。
ThisDocument.Close SaveChanges:=wdDoNotSaveChanges
当此操作到位时，模板似乎关闭了，但是新创建的文档仍然存在，模板VBA继续运行。
有人能够建议关闭模板
浏览 9提问于2022-11-23得票数 0
回答已采纳
3回答
好吧，这可能是一个很长的机会，但在MS Access中，是否可以使用SQL执行VBA？我想写一个运行单个VBA语句或Sub的查询。基本上，我要做的是使用SQL修改表的隐藏属性。
微软在Office实现上做出了足够奇怪的决定，我希望这就是其中之一。
浏览 2提问于2012-11-07得票数 1
回答已采纳
2回答
我想知道在VBA中是否可以将变量的内容作为“代码”使用。例如：
x = 23
formula= "43,025*X^-0,452"
Value = ExecuteContentOf(formula)
我使用excel中的幂曲线来计算4个不同的x，y值的最佳曲线的公式。(1,40) (7，20) (30,10) (60,6)
结果是一个内有公式的图形。Excel自动计算。使用VBA，我可以从对象标题中提取公式的文本。
结果是= 43,025*C2^-0,452
现在，我希望自己在VBA中使用它，将C2更改为其他变量(而不是单元格)，因此y= 43,025*x^-0,452。因
浏览 5提问于2019-10-02得票数 0
回答已采纳
2回答
我在MS Access表单中有一些控件，可以将系统语言更改为土耳其语、阿拉伯语和英语，当我使用VBA编写一些代码时，我希望将系统语言更改为英语。
我有一个改变系统语言的代码，想知道如何在激活VBA编辑器时自动运行这段代码？
浏览 1提问于2016-11-07得票数 2
回答已采纳
2回答
我在Excel中有一个VBA代码，它会询问用户.xls文件在哪里，并用该文件制作一些东西。
我现在要做的是将文件(myFile)的名称传递给Access中的VBA代码，以便用该文件和其他字段更新表。
在VBA Excel中，Sub的名称为：Sub UpdateSupplier(myFile As String)
为了使用myFile，我应该在VBA Access中使用什么代码？
浏览 1提问于2016-11-04得票数 1
下面是一些将A加到B的数学代码：
Sub math()
A = 23
B = 2
ABSumTotal = A + B
strMsg = "The answer is " & "$" & ABSumTotal & "."
MsgBox strMsg
End Sub
但是我如何计算ABSumTotal的平方根呢？在PowerPoint VBA中是否可以这样做？
浏览 0提问于2009-11-11得票数 2
回答已采纳
2回答
我正在处理VBA中的虚数，我试图实现的部分数学涉及到虚数的平方。现在，我试图在即时窗口中对一个复杂的数字进行平方，但是得到了一个“类型错配运行时13”错误。下面是代码。
? WorksheetFunction.Complex(k1, -1*rho*sigma*phi)
? (WorksheetFunction.Complex(k1, -1*rho*sigma*phi))^2
第二行是我在哪里得到一个错误，我不知道如何在VBA中平方这个复数。也试图在网上寻找，但找不到任何有用的东西。
浏览 4提问于2020-12-11得票数 0
回答已采纳
我知道如何使用VBA中的大纲立即关闭所有组，如下所示：
'''' Close outline groups.
With sh.Outline
.ShowLevels _
RowLevels:=1, _
ColumnLevels:=1
End With
我还知道如何使用VBA中的大纲一次打开所有组，如下所示：
'''' Open outline groups.
With sh.Outline
.ShowLevels _
RowLevels:=2, _
C
浏览 2提问于2022-09-19得票数 1
回答已采纳
我已经清除了全部按钮，但我有问题，使撤消清除全部按钮代码在VBA中清除全部按钮
private sub commandbutton1_click
Sheets ("examplesheet").range ("a1:a3").value = ""
有没有人可以帮我在我不小心清除整个表单的情况下，为这个例子做一个撤销按钮？
浏览 6提问于2013-07-22得票数 0
3回答
是否可以在一个过程中声明静态变量，然后使用Excel VBA在多个不同的过程中使用此变量？
即
Public myvar as integer
Sub SetVar()
static myvar as integer
myvar=999
end sub
sub Usevar()
dim newvar as integer
newvar=myvar*0.5
end sub
我需要myvar被其他过程看到，而不是改变或“迷失”。如果myvar没有声明为静态变量，但更多的代码比变量“丢失”，那么上面的代码就可以工作。如果使用静态声明，则usevar过程看不到myvar
浏览 0提问于2014-02-16得票数 15
回答已采纳
2回答
是否有任何方法来检查直到文件存在于VBA中。
我想做的是让vba调用异步。
现在在我跑完之后
wshShell.Run """" & SFilename & """" & s
我想检查直到像这样的文件存在
Wait until fso.fileexists("file")
Msgbox "file is now available"
End wait!!!
在vba有什么办法吗？
我用的是单词vba。
浏览 1提问于2016-05-06得票数 2
回答已采纳
1回答
我正在使用VBA 7.1和excel 2016开发一些VBA代码，这是一个较大的企业应用程序的一部分(主要不是在excel中)。这些宏是从C#应用程序运行的，用于以电子表格的形式导出数据。我正在寻找一个好的指南，这些宏可以在哪些版本的excel上正常运行，以及我可以在哪里寻找可能导致代码崩溃的更改。我是用excel 2016开发的，它的向后兼容性如何？
如果可能的话，我想让它与2010年的excel版本兼容。
浏览 2提问于2017-11-27得票数 0
1回答
我在内存中加载了一个csv文件。我的csv文件使用";“作为字段分隔符。
vba默认的分隔符似乎是"，“因为当我试图访问加载的csv文件的某些行和列时，vba通过元素前进，并以"，”的编号作为参考。
示例：
在我的数据的第10行中有五列: aa 12,34 bb 5,678 (此处"，“is十进制分隔符)
在分隔符为";“的csv文件中，如下所示：
aa；12 34；bb；5 678
所以当我写
MyData(10,2)
我希望得到12,34，但vba返回34;bb;5，因为它使用"，“作为字段分隔符。
所以我的问题是：
我如何告诉vba在加载
浏览 2提问于2020-04-29得票数 0
回答已采纳
3回答
我在Excel2003中制作了一个日历来跟踪任务和类似的项目。我需要能够做的是通过VBA设置一个计时器。如下所示：
run_in_x_secs ( timetowait, function to exec)
有没有办法在excel vba中做到这一点，或者我应该尝试找到一个警报，通过命令行运行，并从VBA运行。
你会怎么做？
浏览 5提问于2011-02-02得票数 4
回答已采纳
3回答
我正在尝试将工作表单元格的值赋给VBA宏中的常量变量。该操作背后的逻辑是，最终用户应该在运行宏之前在指定的单元格中输入当前周。由于此值将在整个宏中重复使用，并且我希望安全起见，我尝试将其声明为公共常量：
private const thisWeek as Integer = Range("B1")
但是，我得到一条关于需要一个常量值的错误消息。那么，在VBA中声明这样的常量是可能的吗？
浏览 1提问于2014-05-30得票数 4
回答已采纳
5回答
VBA函数和变量
、、、
我有一个关于VBA中的变量和函数的问题。我不打算包括项目的确切内容，希望最初的问题不会变得模糊不清。我可以解释的项目，这将用于如果要求。
是否可以在VBA中创建通用变量，以便所有函数都可以使用它们？
例如：
Dim testVariable As String
Dim newVariable As String
testVariable = "A"
Function testFunction() As String
....
newVariable = testVariable
End Function
到目前为止，testVariable (当它在函数中时
浏览 1提问于2011-03-08得票数 4
回答已采纳
2回答
我正尝试在VBA中实现我自己的集合，用来存储对象列表。我是VBA的新手，我需要找到一种实现解决方案的方法。 我所拥有的:具有不同属性的对象列表，其中最重要的是特定操作的持续时间。 我需要的是:我想通过使用基于时间属性(特定操作的持续时间)的比较器来获得对象的排序列表。 你推荐什么样的收藏品？我需要创建自己的helper方法来对集合的元素进行排序？VBA有一个比较器接口，我可以在我自己的集合对象上实现吗？
浏览 85提问于2019-06-20得票数 0
回答已采纳
下面的代码运行良好，并将访问表数据导出到excel文件(C:\temp\test.xlsx)中。
但是我的要求不是在VBA脚本中定义C:\temp文件夹，系统应该要求用户选择输出目录。你能帮我准备一下那个VBA脚本吗？
Private Sub Command3_Click()
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, "Fields", _
"C:\temp\text.xlsx", True
End Sub
浏览 2提问于2018-05-02得票数 0
回答已采纳
我必须检查许多Word文档中的以下内容：
页边距:左=右=上=下=一个特定值，例如(0.5英寸)
我正在尝试写一个小的vba脚本，将报告上述内容。我刚刚开始，目前已经能够找到关于ActiveDocument.PageSetup的信息，它为四个利润率中的每一个提供了4个属性。我是VBA的新手，检查平等对我来说不起作用，这是我尝试过的：
Sub check()
With ActiveDocument.PageSetup
If (.LeftMargin = .RightMargin = .TopMargin = .BottomMargin = 72) Then
MsgBo
浏览 37提问于2018-05-27得票数 2
回答已采纳
在vba中trim和trim$有什么不同？今天，当我在vba中使用left和trim函数时，编译器意外地说cant find project or library
当我在谷歌上搜索它时，在其中一个论坛上，我发现用户使用了以下内容
vba.trim("string")
他回答了函数的前缀为vba。令人惊讶的是，它在我的pc too.But上工作，我找到了这些函数
trim and trim$
left and left$
leftb and leftb$
我想知道什么是trim和trim$。我想找出不同之处，所以我开始搜索它，但结果是trim忽略了$字母表。
我只是好
浏览 0提问于2011-11-02得票数 15
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
