(最新)excel_vba方法参考手册

(最新)excel_vba方法参考手册内容摘要：

应用于 ” 列表中的对象。 item 必需的。 任意类型的表达式，指定要添加到集合中的成员。 key 可选的。 唯一字符串表达式，指定可以使用的键字符串，代替位置索引来访问集合中的成员。 before 可选的。 表达式，指定集合中的相对位置。 在集合中将添加的成员放置在 before 参数识别的成员之前。 如果为一数值表达式，则 before 必须是介于 1 和集合 Count 属性值之间的值。 如果为一字符串表达式，则当添加一个被引用的成员到集合时， before 必须对应于指定的 key 值。 可以指定 before 位置或 after 位置，但不能同时指定这两个位置。 after 可选。 表达式，指定集合中的相对位置。 在集合中将添加的成员放置在 After 参数识别的成员之后。 如果为一数值表达式，则 after 必须是介于 1 和集合 Count 属性值之间的值；如果为一字符串表达式，则当添加一个被引用的成员到集合时， after 必须对应于指定的 key 值。 可以指定 before 位置或 after 位置，但不能同时指定这两个位置。 说明 before 或 after 参数是字符串 表达式或数值表达式，均须引用集合中现有成员，否则将导致错误发生。 如果指定的 key 和集合中现有成员的 key 发生重复，则也会导致错误发生。 应用于 Collection 对象 请参阅 Item 方法、 Remove 方法 Add 方法示例 本示例使用 Add 方法将 Inst 对象（类 Class1 之示例，其中包含 Public 变量 InstanceName ）加到 MyClasses 集合对象中。 若要观察程序的运作，插入一个类模块，并在 Class1 的模块级中声明公用变量 InstanceName（键入 Public InstanceName）来保存每个示例的名称。 类名就用缺省的 Class1。 将下列代码复制与粘贴到某个窗体模块的 Form_Load 事件过程中。 Dim MyClasses As New Collection 39。 建立集合对象。 第 6 页 Dim Num As Integer 39。 定义计数变量。 Dim Msg Dim TheName 39。 用来保存用户指定的名称的变量。 Do Dim Inst As New Class1 39。 建立 Class1 的新示例。 Num = Num + 1 39。 将计数变量加一，并让用户输入名称。 Msg = Please enter a name for this object. amp。 Chr(13) _ amp。 Press Cancel to see names in collection. TheName = InputBox(Msg, Name the Collection Items) = TheName 39。 将输入的名称存到对象 的示例中。 39。 如果名称不是空字符串，则将该示例加到集合对象中。 If Then 39。 将该示例加到集合对象中。 item := Inst, key := CStr(Num) End If 39。 清除对当前示例的引用，以准备下一个。 Set Inst = Nothing Loop Until TheName = For Each x In MyClasses MsgBox , , Instance Name Next Add方法 (Dictionary) 描述 添加一对相对应的关键字和条目到 Dictionary 对象。 语法 key, item Add 方法的语法有如下几部分： 部分 描述 Object 必需的。 一个 Dictionary 对象的名字。 Key 必需的。 与所添加的条目相关联的关键字。 Item 必需的。 与所添加的关键字相关联的条目。 说明 如果该关键字已经存在，则产生一个错误。 应用于 Dictionary 对象 请参阅 ADD 方法（ Folder）、 Exist 方法、 Items 方法、 Keys 方法、 Remove方法、 RemoveAll 方法 Add 方法 (Folders) 第 7 页 描述 添加一个新的 Folder 到 Folders 集合。 语法 folderName Add 方法的语法有如下几部分： 部分 描述 Object 必需的。 一个 Folders 集合的名称。 FolderName 必需的。 新添加的 Folder 的名称。 说明 如果 folderName 已经存 在，则产生一个错误。 应用于 Folders 集合 请参阅 Add 方法 (Dictionary) Assert 方法 有条件地在该方法出现的行上挂起执行。 语法 booleanexpression Assert 方法的语法有如下的对象限定符和参数： 部分 描述 object 必需的。 总是 Debug 对象。 booleanexpression 必需的。 一个值为 True 或者 False 的表达式。 说明 Assert 调用只在开发环境中工作。 当模块被编译成为一个可执行的 文件时，调用 Debug 对象的方法就会被忽略。 全部 booleanexpression 常常被计算。 例如，即使一个 And 表达式的第一部分被计算为 False，整个表达式还要被计算。 应用于 Debug 对象 请参阅 Print 方法 Assert 方法示例 下面的示例说明如何使用 Assert 方法。 示例需要一个带有两个按纽控件的窗体。 缺省的按纽名称是 Command1 和 Command2。 当示例运行时，单击 Command1 按纽使得按纽上的文本在 0 和 1 之间进行切换。 单击 Command2 按纽可能不做任何事，也可能引起一个确认，应该执行哪一个操作取决于 Command1 按纽上所显示的值。 该确认将在最后一个语句执行之后使整个执行停止，并且 行被突出显式。 Option Explicit 第 8 页 Private blnAssert As Boolean Private intNumber As Integer Private Sub Command1_Click() blnAssert = Not blnAssert intNumber = IIf(intNumber 0, 0, 1) = intNumber End Sub Private Sub Command2_Click() blnAssert End Sub Private Sub Form_Load() = intNumber = Assert Tester End Sub BuildPath 方法 描述 追加一个名 字到一个已经存在的路径。 语法 (path, name) BuildPath 方法语法有如下几部分： 部分 描述 object 必需的。 始终是 FileSystemObject 的名字。 path 必需的。 要对其追加名字的已存在路径。 路径可以是绝对的也可以是相对的，不必指定一个已存在的文件夹。 name 必需的。 要追加到已存在路径上的名字。 说明 只有在需要时， BuildPath 方法才在已存在路径和名字之间插入一个附加的路径分隔符。 应用于 FileSystemObject 对 象。 Clear 方法 清除 Err 对象的所有属性设置。 语法 objec 总是 Err 对象。 第 9 页 说明 在处理错误之后使用 Clear 来清除 Err 对象，例如，在对 On Error Resume Next 使用拖延错误处理时就可使用 Clear。 每当执行下列语句时就会自动调用 Clear 方法： ? 任意类型的 Resume 语句。 ? Exit Sub, Exit Function, Exit Property ? 任何 On Error 语句。 注意 当处理因 访问其他对象产生的错误时，与其使用 On Error GoTo，不如使用 On Error Resume Next。 每一次与对象打交道之后都检查 Err，则可消除代码访问对象时的含混之处。 可以确认是哪个对象将错误引入 中，也可以确认最初是哪个对象产生了这个错误（ 中指定的对象）。 应用于 Err 对象 请参阅 Description 属性 、 Err 对象 、 HelpContext 属性 、 HelpFile 属性 、LastDLLError 属性 、 Number 属性 、 On Error 语句 、 Raise 方法 、 Source 属性。 Clear 方法示例 本示例使用 Err 对象的 Clear 方法将 Err 对象之数值属性重新设置为零，并将其字符串属性设置为零长度字符串。 如果在代码中省略 Clear 方法，则每完成一次循环便会显示一次错误信息（发生错误之后），不论程序中的计算结果是否真的有错误。 Dim Result(10) As Integer 39。 声明数组变量。