EXCELVBA帮助手册范文.docx

《EXCELVBA帮助手册范文.docx》由会员分享，可在线阅读，更多相关《EXCELVBA帮助手册范文.docx（53页珍藏版）》请在三一文库上搜索。

1、Excel2003VBA帮助文档WORD格式整理分享目录一些对象的应用方法 4Add方法 5Add 方法(Dictionary) 6Add 方法(Folders) 6Assert 方法 7BuildPath 方法 8Clear 方法 8Close 方法 9Copy 方法 10CopyFile 方法 10CopyFolder 方法 11CreateFolder 方法 12CreateTextFile 方法 13Delete 方法 14DeleteFile 方法 14DeleteFolder 方法 15DriveExists 方法 15Exists 方法 16FileExists 方法 16Fol

2、derExists 方法 17GetAbsolutePathName 方法 17GetBaseName 方法 18GetExtensionName 方法 18GetFile 方法 19GetFileName 方法 19GetFolder 方法 20GetPare ntFolderName 方法 20GetSpecialFolder 方法 21GetTempName 方法 22Hide 方法 22Item 方法 23Items 方法 24Keys 方法 24Move 方法 25Move 方法(UseForm) 251、应用于 252、请参阅 25MoveFile 方法 25MoveFolder

3、方法 26OpenAsTextStream 方法 27Open TextFile 方法 28Print 方法 30Prin tForm 方法 31Raise 方法 31Read 方法 33ReadAII 方法 33ReadLine 方法 34Remove 方法 34Remove 方法FileSystemObject 对象 35RemoveAII 方法 35Show 方法 36Skip 方法 37SkipLi ne 方法 37WhatsThisMode 方法 38Write 方法 38WriteBIa nkLines方法 39WriteL ine 方法 39专业资料一些对象的应用方法1、 Col

4、lection对象ADD方法、Item 方法、Remove方法2、Debug 对象Assert方法、Print 方法3、Dictionary 对象Add方法Dictionary、Exists 方法、Items 方法、Keys方法、 Remove方法、 Remove方法FileSystemObject 对象、RemoveAll 方法、4、Err对象Clear方法、Raise方法5、File 对象、Folder 对象Copy方法、Delete 方法、CreateTextFile 方法Folder对象、Move 方法、 OpenAsTextStream 方法File 对象6、Folders 集合 A

5、dd 方法Folders7、FileSystemObject 对象 BuildPath 方法、CopyFile 方法、CopyFolder 方法、 CreateFolder 方法、CreateTextFile 方法、DeleteFile 方法、 DeleteFolder 方法、 DriveExists 方法、 FileExists 方法、 GetAbsolutePathName 方法、 11 GetBaseName方法、12 GetExtensionName 方法、13 GetFile 方法、14 GetFileName 方法、15 GetFolder 方法、16 GetParentFolde

6、rName 方法、17 GetSpecialFolder 方法、18 GetTempName方 法、19 MoveFile 方法、20 MoveFolder 方法、21QpenTextFile 方法8、UserForm 对象,UserForms 集合对象Hide方法、PrintForm 方法、Show方法、WhatsThisMode方法9、TextStream 对象Close方法、Read方法、ReadAll方法、ReadLine方法、5Skip方 法、6SkipLine 方法、 Write 方法、WriteBlankLines 方法、WriteLine 方法Add方法添加一个成员到 Coll

7、ecti on对象.语法object .Add item, key, before , afterAdd方法的语法具有以下对象限定符和命名参数:局部描述object必需的.对象表达式,其值为“应用于列表中的对象.item必需的.任意类型的表达式,指定要添加到集合中的成员.key可选的.唯一字符串表达式,指定可以使用的键字符串,代替位置索 引来访问集合中的成员.before可选的.表达式,指定集合中的相对位置.在集合中将添加的成员放 置在before参数识别的成员之前.如果为一数值表达式,那么before 必须是介于1和集合Count属性值之间的值.如果为一字符串表达 式,那么当添加一个被引用的

8、成员到集合时,before必须对应于指定的 key值.可以指定before位置或after位置,但不能同时指定这两 个位置.after可选.表达式,指定集合中的相对位置.在集合中将添加的成员放置 在After参数识别的成员之后.如果为一数值表达式,那么after必须是介于1和集合Count属性值之间的值；如果为一字符串表达式, 那么当添加一个被引用的成员到集合时,after必须对应于指定的key 值.可以指定before位置或after位置,但不能同时指定这两个位 置.说明before或after参数是字符串表达式或数值表达式,均须引用集合中现有成员, 否那么将导致错误发生.如果指定的key和

9、集合中现有成员的key发生重复,那么也会导致错误发生.1、应用于Collection 对象2、请参阅Item方法、Remove方法Add方法例如本例如使用 Add方法将Inst 对象(类Class1之例如,其中包含 Public变 量InstanceName )加到MyClasses集合对象中.假设要观察程序的运作,插入 一个类模块,并在Class1的模块级中声明公用变量InstanceName (键入Public InstanceName)来保存每个例如的名称.类名就用缺省的Class1.将下列代码复制与粘贴到某个窗体模块的Form_Load事件过程中.Dim MyClasses As Ne

10、w Collectio n 建立集合对象.Dim Num As In teger 定义计数变量.Dim MsgDim TheName 用来保存用户指定的名称的变量.DoDim Inst As New Class1 建立 Class1 的新例如.Num = Num + 1 将计数变量加一,并让用户输入名称.Msg = Please enter a name for this object. & Chr(13) _& Press Can cel to see n ames in collectio n.TheName = InputBox(Msg, Name the Collection Item

11、s)In st.I nsta nceName = TheName 将输入的名称存到对象的例如中.如果名称不是空字符串,那么将该例如加到集合对象中.If In st.I nsta nceName The n将该例如加到集合对象中.MyClasses.Add item := In st, key := CStr(Num)End If去除对当前例如的引用,以准备下一个.Set Inst = Noth ingLoop Un til TheName =For Each x In MyClassesMsgBox x.i nsta ncen ame, , I nsta nee NameNextAdd 方法(

12、Dictio nary)描述添加一对相对应的关键字和条目到Dictio nary 对象.语法object . Add key, itemAdd方法的语法有如下几局部：局部描述Object必需的.一个 Dictio nary对象的名字.Key必需的.与所添加的条目相关联的关键字.Item必需的.与所添加的关键字相关联的条目.说明如果该关键字已经存在,那么产生一个错误.1、应用于Dictionary 对象2、请参阅 ADD方法(Folder )、Exist 方法、Items 方法、Keys 方法、Remove 方法、RemoveAll方法Add 方法(Folders)描述添加一个新的 Folder

13、至U Folders 集合.语法object . Add folderNameAdd方法的语法有如下几局部：局部描述Object必需的.一个Folders集合的名称.FolderName必需的.新添加的Folder的名称.说明如果folderName已经存在,那么产生一个错误.1、应用于Folders 集合2、请参阅 Add 方法(Dictionary)Assert 方法有条件地在该方法出现的行上挂起执行. 语法object .Assert booleanexpressionAssert方法的语法有如下的对象限定符和参数:局部描述object必需的.总是 Debug对象.boolea nexp

14、ressi on必需的.一个值为 True或者False的表达式.说明Assert调用只在开发环境中工作.当模块被编译成为一个可执行的文件时,调 用Debug对象的方法就会被忽略.全部booleanexpression 常常被计算.例如,即使一个And表达式的第一局部 被计算为False,整个表达式还要被计算.1、应用于Debug对象2、请参阅Print 方法Assert方法例如下面的例如说明如何使用 Assert方法.例如需要一个带有两个按纽控件的窗体. 缺省的按纽名称是Command1和Command2.当例如运行时,单击Command1按纽使得按纽上的文本在 0和1之间进行切换 单击Co

15、mma nd2按纽可能不做任何事,也可能引起一个确认,应该执行哪一个操 作取决于Command1按纽上所显示的值.该确认将在最后一个语句执行之后使整 个执行停止,并且Debug.Assert行被突出显式.Opti on ExplicitPrivate bln Assert As Boolea nPrivate in tNumber As In tegerPrivate Sub Comma nd1_Click()bln Assert = Not bln Assertin tNumber = IIf(i ntNumber 0, 0,1)Comma nd1.Captio n = in tNumber

16、 End SubPrivate Sub Comma nd2_Click()Debug. Assert bln Assert End SubPrivate Sub Form_Load()Comma nd1.Captio n = in tNumberComma nd2.Captio n = Assert Tester End SubBuildPath 方法描述追加一个名字到一个已经存在的路径. 语法object . BuildPath( path , name BuildPath 方法语法有如下几局部：局部描述object必需的.始终是 FileSystemObject 的名字.path必需的.要

17、对其追加名字的已存在路径.路径可以是绝对的 也可以是相对的,不必指定一个已存在的文件夹.n ame必需的.要追加到已存在路径上的名字.说明只有在需要时,BuildPath方法才在已存在路径和名字之间插入一个附加的路径 分隔符.1、应用于 FileSystemObject 对象.Clear方法去除Err对象的所有属性设置.语法object .Clearobjec总是Err对象.说明在处理错误之后使用 Clear来去除Err对象,例如,在对 On Error Resume Next使用拖延错误处理时就可使用 Clear.每当执行以下语句时就会自动调用 Clear方法：*任意类型的Resume语句.

18、 Exit Sub , Exit Function , Exit Property*任何On Error语句.注意当处理因访问其他对象产生的错误时,与其使用 On Error GoTo, 不如使用 On Error ResumeNext.每一次与对象打交道之后都检查 Err, 那么可消除代码访问对象时的含混之处.可以确认是哪个对象将错误引入Err.Number中,也可以确认最初是哪个对象产生了这个错误 (Err.Source 中指定的对象).1、应用于Err对象2、请参阅 Description 属性、Err 对象、HelpContext 属性、HelpFile 属性、 LastDLLErro

19、r 属性、Number 属性、On Error 语句、Raise 方法、Source 属 性.Clear方法例如本例如使用Err对象的Clear方法将Err对象之数值属性重新设置为零,并 将其字符串属性设置为零长度字符串.如果在代码中省略Clear方法,那么每完成一次循环便会显示一次错误信息(发生错误之后),不管程序中的计算结果是否真的有错误.Dim Result(10) As In teger 声明数组变量其元素容易溢出Dim indxOn Error Resume Next 将错误处理的方式改为“继续下一行.Do Un til indx = 10下面计算假设有错误发生,便显示错误信息.Re

20、sult(indx) = Rnd * indx * 20000If Err.Number 0 The nMsgBox Err, , Error Gen erated: , Err.HelpFile,Err.HelpCo ntextErr.Clear 去除Err对象的属性.Elseindx = indx + 1End IfLoopClose方法描述关闭一个翻开的 TextStream 文件.语法object . Closeobject始终是一个 TextStream 对象的名字.1、应用于TextStream对象2、请参阅 Read方法、ReadAII 方法、ReadLine 方法、Skip 方

21、法、SkipLine 方 法、Write 方法、WriteBlankLines 方法、WriteLine 方法.Copy方法描述把一个指定的文件或文件夹从一个地方复制到另一个地方.语法object . Copy destination , overwrite Copy方法语法有如下几局部：描述必需的.始终是一个 File或Folder对象的名字.必需的.文件或文件夹要复制到的接受端.不允许有通配符.可选的.Boolean值,如果该值为True 缺省,那么已存在的 文件或文件夹将被覆盖.如果为False,那么它们不被覆盖.说明对一个File 或Folder,Copy方法的结果和执行 FileSy

22、stemObject.CopyFile 或 FileSystemObject.CopyFolder 操作的结果是 一样的,在后者中,object所引用的文件或文件夹是作为参数传递的.应当注 意,后面的方法能够复制多个文件或文件夹.1、应用于File 对象、Folder对象2、请参阅 CopyFile 方法、CopyFolder 方法、Delete 方法、Move 方法、Ope nAsTextStream 方法CopyFile 方法描述把一个或多个文件从一个地方复制到另一个地方.语法object . CopyFile source, destination , overwrite CopyFil

23、e 方法语法有如下几局部：局部描述object必需的.object始终是一个FileSystemObject 的名字.source必需的.指明一个或多个要被复制文件的字符串文件说 明,它可以包括通配符.desti nati on必需的.指明source中的一个或多个文件要被复制到的接受端的字符串,不允许有通配符.overwrite选项的.Boolean值,匕表示存在的文件是否被覆盖.如 果是True,文件将被覆盖；如果是 False,它们不被覆 盖.缺省值是True.注意如果destination具有只读属性设置,不管overwrite值如何,CopyFile都将失败.说明通配符只能用在sou

24、rce参数的最后一个路径部件.例如,你可以在下面请况使 用通配符：FileSystemObject.CopyFile c:mydocumentsletters*doc, c:tempfolder但下面情况不能使用：FileSystemObject.CopyFile c:mydocume nts*R1?97.xls, c:tempfolder如果source包含通配符或destination以路径分隔符为结尾,那么认为desti natio n是一个已存在文件夹,在其中复制相匹配的文件.否那么认为dest in ati on是一个要创立文件的名字.不管是那种情况,当复制一个文件时,可能发生三种事

25、件.如果destination不存在,source得到复制.这是通常的情况.*如果destination是一个已存在的文件,那么当overwrite 值为False时发生一个错误,否那么,source的复制文件将试图覆盖已存在文件.*如果destination是一个目录,发生一个错误.如果使用通配符的source不能和任何文件匹配,同样产生一个错误.CopyFile 方法停止在它遇到的第一个错误上.不要试图回卷或撤消错误发生前所做的任何 改变.1、应用于 FileSystemObject 对象2、 请参阅 Copy 方法、CopyFolder 方法、CreateFolder 方法、Delete

26、Folder 方 法、MoveFolder 方法CopyFolder 方法描述从一个地方递归地复制一个文件夹到另一个地方. 语法object . CopyFolder source , destination , ove rwriteCopyFolder方法语法有如下几局部:描述必需的.始终为一个 FileSystemObject 的名字.必需的.指明一个或多个被复制文件夹的字符串文件夹说明,可以包括通配符.desti nati on必需的.指明source中被复制文件夹和子文件夹的接受端的字 符串,不允许有通配符.overwrite选项的.Boolean值,匕表示已存在的文件夹是否被覆盖.如

27、果 为True,文件被覆盖.如果为 False ,文件不被覆盖.缺省值 为 True.说明通配符仅可用于source参数的最后一个路径部件.例如你可以在下面情况使用 它：FileSystemObject.CopyFolder c:mydocume ntsletters*, c:tempfolder但不能在下面情况使用它：FileSystemObject.CopyFolder c:mydocume nts*, c:tempfolder如果source包含通配符或destination以路径分隔符为结尾,那么认为desti natio n 是一个已存在的文件夹,在其中复制相匹配的文件夹和子文件夹.

28、 否那么认为destination 是一个要创立的文件夹的名字.不管何种情况,当复制 一个文件夹时,可能发生四种事件. 女口果 destination 是通常的情况. 女口果 destination 女口果 destination如果一个包含在不存在,source文件夹和它所有的内容得到复制. 这是一个已存在的文件,那么发生一个错误. 是一个目录,它将尝试复制文件夹和它所有的内容.source 的文件已在 destination 中存在,当overwrite 为False时发生一个错误,否那么它将尝试覆盖这个文件如果destination是一个只读目录,当尝试去复制一个已存在的只读文件到此目录

29、并且 overwrite为False时,那么发生一个错误.如果source使用的通配符不能和任何文件夹匹配,也发生一个错误. CopyFolder方法停止在它遇到的第一个错误上.不要尝试回卷错误发生前所做 的任何改变.1、应用于 FileSystemObject 对象2、请参阅 Copy 方法、CopyFile 方法、CreateFolder 方法、DeleteFolder 方 法、MoveFolder 方法CreateFolder 方法描述创立一个文件夹.语法object . CreateFolder( folder name )CreateFolder 方法有如下几局部：局部描述objec

30、t必需的.始终是一个 FileSystemObject的名字.folder name必需的.字符串表达式,它标识创立的文件夹.说明如果指定的文件夹已经存在,那么发生一个错误.1、应用于 FileSystemObject 对象2、请参阅 CopyFolder 方法、CreateTextFile 方法、DeleteFolder 方法、 MoveFolder 方法.CreateTextFile 方法描述创立一个指定的文件名并且返回一个用于该文件读写的TextStream对象语法object . CreateTextFile( file name , overwrite , uni code )Cre

31、ateTextFile方法有如下几局部：描述必需的.字符串表达式,它标识创立的文件.必需的.始终是一个FileSystemObject 或Folder对象的名字.可选的.Boolean值,表示一个已存在文件是否可被覆盖.如果 可被覆盖其值为True ,其值为False时不能覆盖.如果它被省 略,那么已存在文件不能覆盖.可选的.Boolea n值,表示文件是作为一个 Uni code文件创立的 还是作为一个ASCII文件创立的.如果作为一个Uni code文件创 建,其值为True,作为一个ASCII文件创立,其值为 False. 如果省略的话,那么认为是一个 ASCII文件.说明下面的代码举例

32、说明如何使用CreateTextFile方法创立和翻开文本文件Sub CreateAfileSet fs = CreateObject(Script in g.FileSystemObject)Set a = fs. CreateTextFile( c:testfile.txt , True )a.WriteL in e(This is a test.)a.CloseEnd Sub对于一个已经存在的file name,如果overwrite 参数是False或者没有提供, 那么发生一个错误.1、应用于 FileSystemObject 对象、Folder 对象2、请参阅 CopyFile 方法

33、、DeleteFile 方法、OpenAsTextStream 方法、 Ope nTextFile 方法Delete方法描述删除一个指定的文件或文件夹语法object . Delete forceDelete方法语法有如下几局部:描述必需的.始终是一个 File或Folder对象的名字.可选的.Boolean值,如果要删除具有只读属性设置的文件或文 件夹,其值为True.当其值为False时缺省,不能删除具有 只读属性设置的文件或文件夹.说明如果指定的文件或文件夹不存在,那么发生一个错误 对于一个File 或Folder,Delete 方法的结果和执行FileSystemObject.Dele

34、teFile 或 FileSystemObject.DeleteFolder操作的结果是一样的.Delete方法对于文件夹内是否有内容不做区别. 不管指定的文件夹是否有内容, 它都被删除.1、应用于File 对象、Folder对象.2、请参阅 Copy方法、Delete 方法、DeleteFolder 方法、Move方法、 Open AsTextStream 方法.DeleteFile 方法描述删除一个指定的文件语法object . DeleteFile filespec , force DeleteFile方法语法有如下几局部:描述必需的.始终是一个 FileSystemObject 的名字

35、.必需的.要删除文件的名字.Filespec可以在最后的路径部件中包 含通配符.说明如果没有发现相匹配的文件,那么产生一个错误.DeleteFile方法停在它遇到的第一个错误上.不要尝试回卷或撤消错误发生前所做的任何改变.1、应用于 FileSystemObject 对象2、请参阅 Copy方法、Delete 方法、DeleteFolder 方法、MoveFile 方法DeleteFolder 方法描述删除一个指定的文件夹和它的内容 语法object . DeleteFolder folderspec , force DeleteFolder方法语法有如下几局部：描述必需的.始终是一个 Fil

36、eSystemObject的名字.必需的.要删除的文件夹的名字.Folderspec可以在最后的路径部件中包含通配符.可选的.Boolean值,如果要删除具有只读属性设置的文件夹, 其值为True,如果值为False (缺省),那么不能删除具有只读 属性设置的文件夹.说明DeleteFolder方法对文件夹中有无内容不做区别.不管指定的文件夹中是否有 内容,它都被删除.如果没有发现相匹配的文件夹,那么发生一个错误.DeleteFolder方法停止在它遇到的第一个错误上,不要尝试回卷或撤消错误发生前所做的任何改变.1、应用于 FileSystemObject 对象2、请参阅 CopyFolder

37、 方法、CreateFolder 方法、Delete 方法、DeleteFile 方 法、MoveFolder 方法.DriveExists 方法描述如果指定的驱动器存在,返回True,如果不存在返回False语法object . DriveExists( drivespec )DriveExists方法语法有如下几局部:局部描述Object必需的.始终是一个 FileSystemObject 的名字.Drivespec必需的.一个驱动器字符或一个完整的路径说明.说明对于可删除介质的驱动器,即使没有介质存在,DriveExists 方法也返回True 使用Drive对象的IsReady属性确定

38、驱动器是否准备好.1、应用于 FileSystemObject2、请参阅 FileExists 方法、FolderExists 方法Exists 方法描述如果在Dictionary对象中指定的关键字存在,返回True,假设不存在,返回False.语法object . Exists( key)Exists方法语法有如下几局部:局部描述Object必需的.始终是一个 Dictio nary对象的名字.Key必需的.在Dictionary对象中搜索的Key值.1、应用于Dictionary 对象2、请参阅 Add 方法(Dictionary) 、Items 方法、Keys 方法、Remove 方法、

39、 RemoveAll 方法FileExists 方法描述如果指定的文件存在,返回True,假设不存在,那么返回 False.语法object . FileExists( filespec )FileExists方法语法有如下几局部：局部描述object必需的.始终是一个 FileSystemObject的名字.filespec必需的.要确定是否存在的文件的名字.如果认为文件不在当前文件夹中,必须提供一个完整的路径说明绝对的或相对的1、应用于 FileSystemObject 对象2、 请参阅 DriveExists 方法、FolderExists 方法FolderExists 方法描述如果指定

40、的文件夹存在返回True,不存在返回False语法object . FolderExists( folderspec )FolderExists方法语法有如下几局部:描述必需的.始终是一个 FileSystemObject 对象的名字.必需的.要确定是否存在的文件夹名字.如果认为文件夹不在当 前文件夹中,必须提供一个完整的路径说明绝对的或相对的.1、 应用于 FileSystemObject 对象2、 请参阅 DriveExists 方法、FileExists方法GetAbsolutePathName 方法描述从提供的路径说明中返回一个完整、明确的路径C 语法object . GetAbsol

41、utePathName pathspecGetAbsolutePathName方法语法有如下几局部:局部描述object必需的.始终是一个 FileSystemObject 的名字.pathspec必需的.要改变到一个完整、明确路径的路径说明.说明一个路径如果提供了从指定驱动器根目录的一个完整引用,那么该路径是完整、明确的.一个完整的路径如果指定一个被映射驱动器的根文件夹, 它只能以路径分 隔符为结尾.假设当前目录是 c:mydocumentsreports,下面的表说明了GetAbsolutePathName 方法的行为.Pathspec返回的路径c:c:mydocume ntsreport

42、scc:mydocume ntsc:c:c:*.*may971c:mydocume ntsreports*.*may97regio n1c:mydocume ntsreportsregio n1c:.mydocume ntsc:mydocume nts1、应用于 FileSystemObject 对象2、请参阅 BuildPath 方法、GetBaseName方法、GetDrive 方法、GetDriveName 方法、GetExtensionName 方法、GetFile 方法、GetFileName 方法、GetFolder 方法、GetParentFolderName 方法、GetSpe

43、cialFolder 方法、GetTempNam前 法GetBaseName 方法描述返回一个包含路径中最后部件的根本名字去掉任何文件扩展名的字符串.语法object . GetBaseNamepathGetBaseName方法语法有如下几局部：局部描述object必需的.始终是一个 FileSystemObject的名字.path必需的.要返回其根本名字的部件的路径说明.说明如果没有部件和path参数匹配,GetBaseName方法返回一个长度为零的字符串.注意GetBaseName方法只对提供的path字符串起作用.它既不试图去辨认路径,也不检查指定路径是否存在.1、应用于 FileSys

44、temObject 对象2、请参阅 BuildPath 方法、GetAbsolutePathName 方法、GetDrive 方法、 GetDriveName 方法、GetExtensionName 方法、GetFile 方法、GetFileName 方 法、GetFolder 方法、GetParentFolderName 方法、GetSpecialFolder 方法、 GetTempNam前 法GetExtensionName 方法描述返回一个包含路径中最后部件扩展名的字符串.语法object . GetExtensionName( path)GetExtensionName方法语法有如下几局部:局部描述object必需的.始终是一个 FileSystemObject的名字.path必需的.要返回其扩展名的部件的路径说明.说明对于网络驱动器,根目录()被认为是一个部件.如果没有部件和path参数相匹配,GetExtensionName方法返回一个长度为零 的字符串().1、应用于 FileSystemObject 对象2、请参阅 BuildPath 方法、GetBaseName方法、GetDrive 方法、GetDriveName 方法、GetFile 方法、GetFolde