VBA中的CreateObject函数.doc_第1页
VBA中的CreateObject函数.doc_第2页
VBA中的CreateObject函数.doc_第3页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

Excel VBA之CreateObject 函数先看一下下面的句子,体会一哈:Set d = CreateObject(Scripting.Dictionary) 建立字典对象变量dSet xlApp = CreateObject(excel.application) 建立Excel对象变量xlAppSet fso = CreateObject(Scripting.FileSystemObject) 建立文件系统对象变量fsoCreateObject 函数创建并返回一个对 ActiveX 对象的引用。语法CreateObject(class,servername)CreateObject函数的语法有如下部分:部分描述appname必需的;Variant(字符串)。提供该对象的应用程序名。objecttype必需的;Variant(字符串)。待创建对象的类型或类。class参数使用 appname.objecttype这种语法,包括以下部分:部分描述appname必需的;Variant(字符串)。提供该对象的应用程序名。objecttype必需的;Variant(字符串)。待创建对象的类型或类。说明每个支持自动化的应用程序都至少提供一种对象类型。例如,一个字处理应用程序能会提供 Application对象,Document对象,以及 Toolbar对象。要创建 ActiveX 对象,只需将 CreateObject返回的对象赋给一个对象变量:声明一个对象变量来存放该对象的引用。Dim as Object 采用后期绑定方式。Dim ExcelSheet As ObjectSet ExcelSheet = CreateObject(Excel.Sheet)上述代码将启动该应用程序创建该对象,在本例中就是创建一个 Microsoft Excel 电子数据表。对象创建后,就可以在代码中使用自定义的对象变量来引用该对象。在下面的示例中,可以使用对象变量 ExcelSheet 来访问新建对象的属性和方法,以及访问 Microsoft Excel 的其它对象,包括应用程序对象和单元格集合。设置 Application 对象使 Excel 可见ExcelSheet.Application.Visible = True在表格的第一个单元中写些文本ExcelSheet.Application.Cells(1, 1).Value = This is column A, row 1将该表格保存到C:test.xls 目录CreateObject 函数示例该示例使用 CreateObject函数设置一个对 Microsoft Excel 的引用 (xlApp)。它使用该引用来访问 Microsoft Excel 的 Visible属性,并使用 Microsoft Excel 的 Quit方法将其关闭,最后再释放该引用。Dim xlApp As Object定义存放引用对象的变量。Set xlApp = CreateObject(excel.application) 如果要让该应用程序可见,则需将 Visible 属性设为 True。xlApp.Visible = True可以使用 xlApp 访问 Microsoft Excel 的其它对象。xlApp.Quit完成时,调用 Quit 方法关闭Set xlApp = Nothing该应用程序,然后释放该引用。注:当你想用CreateObject 函数创建某个对象时,先查找到其对应的class以下是常见的。creatobject(adodb.recordset) 数据库记录操作creatobject(scripting.filesystemobject) 文件操作creatobject(wscript.shell) SHELLcreatobject(work) 网络操作createobject(microsoft.xmlhttp) XMLHTTP ,远程获取文件用的createobject (msxml2.xmlhttp.4.0) 同上createobject(adodb.stream) 数据流传输createobject(adodb.connection) 数据库连接createobject (word. application ) WORDcreateobject (excel. application ) EXCELcreateobject (mswc.adrotator) 广告createobject(scripting.dictionary) HASH表操作createobject(powerpoint.application)createobject(Microsoft.XMLDOM) XML操作createobject(WScript.Shell)createobject(work) createobject(MSWC.adRotator)createobject(excel.sheet)createobject(frontpage.application)createobject(access.application)createobject(msgraph.application)createobject(photoshop.application)/关于SQL Server的CreateObject(SQLDMO.SQLServer)CreateObject(SQLDMO.Login)CreateObject(SQLDMO

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论