Set objExcel = CreateObject("Excel.Application") 'Set properties and execute methods of the object With objExcel .Visible = True .Workbooks.Add .Range("A1") = "Hello World" End With End Sub 3. 使用CreateObject创建指定版本的Excel实例 Sub mate() Dim objExcel As Object Set objExcel = Creat...
Set http = CreateObject("Microsoft.XMLHTTP") http.Open "GET", "http://api.avatardata.cn/Wifi/QueryByCity", False http.setRequestHeader "CONTENT-TYPE", "application/x-www-form-urlencoded" http.send "key=[AppKey]&city=北京&page=1" 这时我们创建的对象就不再是IE,而是HTTP对象。这里用的是a...
语法:CreateObject("Shell.Application").BrowseForFolder(s1, s2, s3, s4) 第一个为对话框的窗体句柄,一般设置为0;第二个为打开窗体的说明,如上图中的“请选择上传文件夹”;第三个参数控制打开的窗口中显示的内容以及窗体中某些元素的状态,如不显示“新建文件夹”;第四个参数为可选参数,只要控制对话框中文件系...
一、VBA 使用MADC的ADODB.Stream生成UTF-8文本文件(去掉BOM头)作者:masterjian 主要实现思路是使用 ADODB.Stream 主要关键代码如下: Dim fsT As Object Set fsT = CreateObject("ADODB.Stream") fsT.T…
Setcnn=CreateObject("ADODB.Connection") Setrst=CreateObject("ADODB.Recordset") 前期绑定:先引用“Microsoft ActiveX Data Objects 2.x Library”(尽量选择高版本),然后直接就可以使用了。下面两种写法都可以: Dimcnn1AsADODB.Connection Setcnn1=NewADODB.Connection ...
[1] Workbooks.Open(https://www.oreilly.com/library/view/programming-excel-with/0596007663/re315.html) [2] EXCEL-VBA:Workbooks.Open 参数 (打开文件)(https://blog.csdn.net/jyh_jack/article/details/83820068) [3] VBA 打开带密码的文件(https://blog.csdn.net/weixin_33709590/article/details/9425...
VBSCRIPT.REGEXP 是 Excel vba 的 "正则表达式" 对象。功能与一般的 javascript , php 的 "正则表达式" 差不多,可做"适配"(match),"取代"(replace)等工作,1楼例子是"取代"。Sub Delete()Dim i%'宣告取用"VBSCRIPT.REGEXP" 对象With CreateObject("VBSCRIPT.REGEXP")'全局.Global = True'适配字为所有汉字...
MsgBox "请输入保存的文件名" Exit Sub End If SaveFile = savePath & "\" & Me.TxbTitle & ".docx" Else SaveFile = savePath & "\合并" & Format(Now, "YYYYMMDDhhmmss") & ".docx" End If Set WordApp = CreateObject("Word.Application") WordApp.Visible = False ...
Function AdjustElements(arr As Variant) As Variant Dim arrTem() Dim regEx As Object Dim NewElem As String Dim arrResult() Dim strA As String, strB As String, strT As String Set regEx = CreateObject("VBScript.RegExp") With regEx .Pattern = "[a-zA-Z].*[a-zA...
VBE即VBA的编辑环境。通常有两种方式可以进入 菜单栏 -> 开发工具 -> Visual Basic 快捷键:Alt + F11 3. 第一个VBA程序 进入VBE后,在菜单栏依次选择“插入”->“模块”,然后光标会自动定位到代码窗口中,VBA中的代码即在此编写。 VBA常使用“过程”来组织代码(另一种方式是“函数”,后面会介绍)。过程用 ...