怎么在vb中使用vba中的一个函数filesearch

这个保证可以用：

Sub t()

Dim s As FileSearch '定义一个文件搜索对象

dim xlApp as ExcelApplication

Set xlApp = New ExcelApplication

Set s = xlAppFileSearch

关键是要先创建一个excel程序的实例（在VBA中，这个实例即为当前excel程序Application，不需使用New语句创建）

两个设置均在Excel中完成。打开指定工作簿，然后按下面方法进行 *** 作：

第一问，工具-宏-安全性：将安全性设置为低；

第二问，工具-选项-安全性：将个人信息选项-保存时从文件属性中删除个人信息 前面的勾去掉！

完成以上两个步骤之后保存，然后关闭工作簿即可！

大部分vba是不能直接在vb中运行的

最主要的区别是：vb是用来创建应用程序的，vba是寄生于现有的程序中（excel等）

vba过程中一般会直接调用到例如excel的单元格、行、列、sheet等对象元素，

直接搬到vb中运行，

1、需要加载引用项目：Microsoft Excel 110 object library

2、需要重新申明各个工作薄、工作表，才可以调用其中对象元素：

Dim xlapp As ExcelApplication

Dim xlbook As ExcelWorkbook

Dim xlsheet As ExcelWorksheet

逻辑判断语法想通，几乎不用改

总之，若是设计工作表内部对象，需要修改地方很多，不能直接运行

以上就是关于怎么在vb中使用vba中的一个函数 filesearch全部的内容，包括:怎么在vb中使用vba中的一个函数 filesearch、vb调用vba的全自动执行，请详细解答我遇到的两个问题、vba代码能不能直接在VB中运行等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！