VBA脚本中如何一次性创建多层级目录

在使用VBA创建目录(文件夹)时,除了最下面一层的目录外,如果其他层目录不存在,则报错。 那么,如果想一次性创建多个目录,就需要自己写脚本实现。 如果过程实现了一次性创建多层级目录,如果上级目录不存在,则自动创建。 Public Sub MakeDir(destpath As String) On Error Resu…

VBA脚本中如何判断Variant变量是否为空

VBA脚本中判断Variant变量是否为空的方法,一般有以下三种: 第一种: if typeName( curVariant) <> “Nothing” then … end if 第二种: if typeName( curVariant) <> “…

VBA脚本中如何遍历Dictionary对象

Dim dict Set dict = CreateObject(“Scripting.Dictionary”) ‘第一种方法 k = dict.keys v = dict.Items For i = 0 To dict.Count – 1 key = k(i) Valu…

VBA脚本中如何获取当前EXCEL文件的路径

返回应用程序完整路径 Application.Path 返回当前工作薄的路径 ThisWorkbook.Path 返回当前默认文件路径: Application.DefaultFilePath Application.ActiveWorkbook.Path 只返回路径 Application.ActiveWorkboo…

VBA脚本报错:运行时错误 ‘1004’:不能取得类 WorksheetFunction 的 Transpose 属性

在VBA中,需要取得SHEET页某个区域的内容,并将取得的内容进行转置。 使用如下代码来进行转置: dim sheetval as variant Sheetval = Application.WorksheetFunction.Transpose(sheet.Range("A3:D10")) 结果,执行时报错:运行时…

在VBA脚本中如何获取对象或变量的数据类型?(附VBA示例代码)

在写VBA脚本时,有时候可能会需要去获取对象或变量的数据类型,一方面,可能是需要与其他类型的变量进行比较,另一方面,可能是需要根据变量的数据类型来确定变量的取值范围。 在VBA中,有不少基本的数据类型,如字符串(String)、整型(Integer)、货币型(Currency)、字节型(Byte)、日期型(Date)、…

在VBA脚本中如何遍历Collection集合对象?(附VBA示例代码)

Collection对象在VBA脚本中还是会被经常使用的。Collection对象作为一个数组,使用起来也非常方便。 一般来说,有两种方法对数组进行遍历。 一种方法是,使用索引下标来访问。 另一种方法是,直接遍历数组的元素。 这两种方法,在使用时,都非常方便。 下面介绍两种方法的示例代码供大家参考: Sub 按钮1_C…

如何使用VBA实现打开文件对话框选择文件及文件夹(附VBA示例代码)

为了使VBA程序编写的小工具更加灵活,有时候需要我们像WORD或EXCEL一样,弹出一个对话让用户去选择需要的文件或文件夹。 在VBA中,FileDialog对象提供了一个文件对话框的功能。它也WORD、EXCEL、POWERPOINT中标准的打开、保存、另存为等对话框类似。可以让我们实现一些很灵活的功能。 FileD…