在VBA中 Createobject函數(shù)可以創(chuàng)建并返回一個對ActiveX對象的引用
要創(chuàng)建 ActiveX 對象,只需將?CreateObject?返回的對象賦給一個變量:
'聲明一個對象變量來存放該對象的引用。Dim 變量 as Object采用后期綁定方式
Dim ExcelSheet As ObjectSet?
ExcelSheet = CreateObject("Excel.Sheet")
代碼就是創(chuàng)建一個 Microsoft Excel 電子數(shù)據(jù)表
'聲明一個對象變量來存放該對象的引用。Dim 變量 as Object采用后期綁定方式
Dim ExcelSheet As ObjectSet?
ExcelSheet = CreateObject("Excel.Sheet")
vba?Createobject可以創(chuàng)建的常用對象還有:
creatobject("adodb.recordset") 數(shù)據(jù)庫記錄操作?
creatobject("scripting.filesystemobject") 文件操作?
creatobject("wscript.shell") SHELL creatobject("wscript.network") 網(wǎng)絡(luò)操作?
createobject("microsoft.xmlhttp") XMLHTTP ,遠程獲取文件用的?
createobject ("msxml2.xmlhttp.4.0") 同上?
createobject("adodb.stream") 數(shù)據(jù)流傳輸?
createobject("adodb.connection") 數(shù)據(jù)庫連接?
createobject ("word. application ") WORD?
createobject ("excel. application ") EXCEL?
createobject ("mswc.adrotator") 廣告?
createobject("scripting.dictionary") HASH表操作?
createobject("powerpoint.application")?
createobject("Microsoft.XMLDOM") XML操作?
createobject("WScript.Shell")?
createobject("wscript.network")?
createobject("MSWC.adRotator")?
createobject("excel.sheet")?
createobject("frontpage.application")?
createobject("access.application")?
createobject("msgraph.application")?
createobject("photoshop.application")?
//關(guān)于SQL Server的?
CreateObject("SQLDMO.SQLServer")?
CreateObject("SQLDMO.Login")?
CreateObject("SQLDMO.Backup")?
CreateObject("SQLDMO.User")?
CreateObject("SQLDMO.BackupDevice")?
CreateObject("SQLDMO.Database")?
CreateObject("SQLDMO.Restore")