ExcelVBA自定义工具栏Word格式.docx
- 文档编号:19580307
- 上传时间:2023-01-08
- 格式:DOCX
- 页数:11
- 大小:22.40KB
ExcelVBA自定义工具栏Word格式.docx
《ExcelVBA自定义工具栏Word格式.docx》由会员分享,可在线阅读,更多相关《ExcelVBA自定义工具栏Word格式.docx(11页珍藏版)》请在冰豆网上搜索。
将内置工具栏重置为默认设置,在恢复软件原有工具栏或菜单时非常有用。
重置内置工具栏将删除其中的自定义控件并恢复其内置控件。
3.CommandBarControls集合
该集合代表工具栏中的所有工具栏控件。
其Add方法用于在CommandBarControls集合中增加一个工具栏控件。
4.CommandBarControl对象
该对象代表工具栏控件,对自定义工具栏控件,可使用CommandBarButton、CommandBarComboBox和CommandBarPopup对象进行定义,而对软件内置的控件进行操作,而该控件又无法使用上述三个对象表示,则可使用CommandBarControl对象。
(1)BeginGroup属性:
用于设置工具栏控件是否分组显示。
(2)Caption属性:
用于设置工具栏控件的标题文字,并可作为默认的控件屏幕提示。
(3)Id属性:
用于设置CommandBarButton、CommandBarComboBox和CommandBarControl对象的功能,这些控件可直接设置为内置工具栏控件的ID,这样该控件即具备了软件内置的相应功能,自定义控件的ID属性均需设置为1。
(4)Copy方法:
将工具栏控件复制到已有的工具栏中。
expression.Copy(Bar,Before)
Bar为可选的Variant类型,代表目标工具栏,如果省略,则控件将复制到自身所在的工具栏;
Before为可选的Variant类型,代表新控件在指定工具栏的位置,即新控件将添加至该位置的控件前,如果省略,则控件将复制到工具栏的末尾。
(5)Type属性:
返回工具栏控件的类型,可通过VBA常量进行引用,常用的工具栏控件类型如下表所示:
本文标签:
常量名称
含义
msoControlButton
控制按钮
msoControlButtonDropdown
带下拉列表的按钮
msoControlButtonPopup
带弹出菜单的按钮
msoControlComboBox
下拉组合控制框
msoControlDropdown
下拉列表控制框
msoControlEdit
文本框
msoControlExpandingGrid
可扩展的表格
msoControlGraphicCombo
图像下拉组合框
msoControlGraphicDropdown
图像下拉列表框
msoControlGrid
表格
msoControlPopup
弹出菜单
5.CommandBarButton对象
该对象代表工具栏的按钮控件。
(1)OnAction属性:
返回或设置VisualBasic代码过程名(该代码过程不可使用参数),该过程将在单击按钮后运行。
(2)Style属性:
返回或设置工具栏按钮的显示方式。
值可通过VBA常量进行设置,常用的工具栏按钮控件类型如下表所示:
msoButtonIcon
包含图标的按钮
msoButtonCaption
包含标题的按钮
ButtonIconandCaption
包含图标和标题的按钮
msoButtonIconAndCaptionBelow
包含图标和标题,且标题位于底部的按钮
msoButtonIconAndWrapCaption
包含图标和标题,且标题自动换行的按钮
msoButtonWrapCaption
包含标题,且标题自动换行的按钮
(3)TooltipText属性:
返回或设置工具栏按钮控件的屏幕提示。
(4)FaceId属性:
返回或设置工具栏按钮的图标编号,设置工具栏按钮的外观而非其功能,自定义图标的工具栏按钮,其FaceId属性值为0。
(5)CopyFace方法:
将工具栏按钮控件的图标复制到剪贴板。
(6)PasteFace方法:
将剪贴板的图标内容粘贴至工具栏按钮控件。
(7)Execute方法:
运行工具栏控件对应的过程或内置命令。
6.CommandBarComboBox对象
该对象代表工具栏中的组合框控件。
(1)DropDownLines属性:
返回或设置组合框控件的行数,如将其设置为0,则控件行数将取决于列表的条目数。
(2)List属性:
返回或设置组合框控件中某列表项的值,对内置组合框控件只读。
(3)OnAction属性:
返回或设置VisualBasic代码过程名(该代码过程不可使用参数),该过程在单击或更改组合框控件值时运行。
返回或设置组合框控件的显示方式。
(5)AddItem方法:
用于在组合框控件中添加一个列表项,且该组合框控件必须为自定义的控件。
(6)RemoveItem方法:
用于从组合框控件中删除一个列表项。
(二)助手对象
Office助手是一组卡通动画人物,这些助手可提供友好的信息提示,并可通过自定义对话框(又称“气球”)的文字格式和控件来实现简单的交互。
1.Assistant对象
该对象代表Office助手,可通过Application对象的Assistant属性返回Assistant对象。
默认助手为“大眼夹”(即“Clippit”),用户可在右键单击助手后出现的快捷菜单中单击“选择助手”菜单项,在弹出的“Office助手”对话框中即可选择不同的助手。
(1)Animation属性:
用于返回或设置Office助手的动画效果。
如应用于Balloon对象,则“助手”仅在显示气球时才会出现动作,可通过常量赋值,常用的常量及其含义如下表所示:
代表的动作
msoAnimationAppear
助手出现
msoAnimationBeginSpeaking
助手开始说话
msoAnimationCheckingSomething
助手检查动作
msoAnimationDisappear
助手消失
msoAnimationGoodbye
助手说“再见”
msoAnimationGreeting
助手致欢迎的动作
msoAnimationIdle
助手休息的动作(为默认动画效果类型)
msoAnimationPrinting
助手打印的动作
msoAnimationSaving
助手保存的动作
msoAnimationSearching
助手开始查找的动作
msoAnimationThinking
助手考虑的动作
(2)AssistWithAlerts属性:
用于设置助手气球是否发送给应用程序警告信息。
(3)AssistWithHelp属性:
用于设置当用户按F1键显示帮助时助手是否出现。
(4)AssistWithWizards属性:
用于设置助手是否提供向导型的联机帮助。
(5)FeatureTips属性:
用于设置助手是否更有效地提供有关应用程序功能信息。
(6)GuessHelp属性:
用于设置助手是否显示帮助主题列表。
(7)FileName属性:
用于设置助手所使用的文件名,助手文件的扩展名为“acs”,一般位于Office的安装目录下。
其中“孙悟空”为mnkyking.acs;
“大眼夹”为Clippit.acs;
“恋恋”为OffCat.acs;
“聪聪”为Rocky.acs;
“七巧板”为Logo.acs;
“小灵通”Dot.acs;
“美丽家园”为MNature.acs;
“F1”为F1.acs。
(8)NewBalloon属性:
用于新建助手气球,并返回Balloon对象。
(9)On属性:
用于设置是否使用助手。
(10)Sounds属性:
用于设置助手是否发出与动画对应的声音。
(11)TipOfDay属性:
用于设置每次启动Office时,助手是否显示专用的提示。
2.Balloon对象
该对象代表气球,助手可在该气球中显示标题、文字和一些控件,通过NewBalloon属性可返回Balloon对象,且任意时刻仅有一个气球可视。
(1)BalloonType属性:
用于设置助手所用的气球类型,可通过常量赋值。
创建Balloon对象时,初始值为msoBalloonTypeButtons常量。
(2)Button属性:
用于设置助手气球底部按钮类型。
创建Balloon对象时,初始值为msoButtonSetOK。
(3)Icon属性:
用于设置助手气球左上角的图标类型,可通过常量赋值。
(4)Checkboxes属性:
返回BalloonCheckboxes集合,即气球中的所有复选框。
(5)Heading属性:
用于设置助手气球中的标题。
气球标题和文本均支持包含下划线和系统调色板16色的文字。
如需显示包含下划线的文字,可通过“{ul}”、“{ul1}”语法来开始下划线和“{ul0}”语法来清除下划线;
如需改变文字颜色,可通过“{cfnumber}”语法,其中number常数为系统调色板支持的16种颜色。
(6)Labels属性:
返回BalloonLabels集合,即气球中的所有标签。
(7)Mode属性:
用于设置气球的模态,即是否在显示气球的同时允许用户在程序中继续工作。
(8)Text属性:
用于设置助手在气球标签、复选框或直接显示部分的文字。
(9)Close方法:
用于关闭活动的非模态气球,仅在回调过程中才可使用。
(10)Show方法:
用于显示指定的气球对象。
3.BalloonCheckBox对象
该对象代表气球中的复选框控件。
Checked属性:
返回是否已选择气球中的指定复选框。
(三)内置对话框对象
Office使用了大量的内置对话框,在Word和Excel中提供了开发接口,使开发者可充分利用内置对话框实现很多操作,尤其在Word中可使用多种方法显示内置对话框,实现不同的功能需求,这里,我们以Word的内置对话框为例进行讲解。
1.Dialogs集合对象
该集合对象代表Word或Excel中的Dialog对象集合,其中每个Dialog对象均代表一个内置对话框,无法在Dialogs集合中创建新的内置对话框,也无法添加对话框。
2.Dialog对象
该对象代表内置对话框。
(1)CommandName属性:
用于返回显示指定内置对话框对应的过程名。
(2)DefaultTab属性:
用于设置显示指定对话框时,其被激活的选项卡。
(3)Display方法:
用于显示指定的内置对话框,并直至用户关闭该对话框或超时,使用显示内置对话框时,不会执行任何操作(即仅用于显示),但可返回用户关闭对话框时所单击的按钮代号。
其中,返回-2,代表“关闭”按钮;
返回-1,代表“确定”按钮;
返回0,代表“取消”按钮;
返回大于0的值,则1代表第一个按钮,2代表第二个按钮,以此类推。
(4)Execute方法:
用于应用内置对话框的当前设置。
(5)Show方法:
用于显示并执行内置对话框,即如同用户通过菜单或工具栏打开对话框,和Display方法相同,均返回用户关闭对话框时所单击的按钮代号。
(6)Update方法:
用于更新内置对话框的参数值。
3.显示内置对话框
通过VBA代码可控制内置对话框的显示,如需调用指定的内置对话框,可将Dialogs属性通过常量进行赋值,如“Dialogs(wdDialogFileOpen).Show”可显示Word的“打开”对话框。
在前述代码中,如将该语句的返回值赋予Dialog变量,即可通过该变量返回或设置对话框的选项,代码如下所示:
SettestDialog=Dialogs(wdDialogFileOpen)
合理使用内置对话框可实现很多的功能,Word和Excel中提供接口的内置对话框非常多,限于篇幅,本文不做详细介绍,读者可参考VBA的联机帮助。
(四)窗体和相关控件对象
VBA的编辑器和VB非常类似,因此也提供了窗体和相关的控件,但又由于Office的特点使VBA中的窗体、控件和VB存在一些差异。
1.用户窗体知识点
窗体是程序实现和用户交互的接口,通过窗体不仅可改善程序的界面友好性,而且可进一步增强、完善程序的功能。
在VBA编辑器中可创建用户窗体,在工程资源管理器中右键单击项目,在出现的菜单中选择“插入→用户窗体”命令,随后在设计界面中将显示默认窗体和控件工具箱,该控件工具箱和VB的控件工具箱很类似,如图3所示。
2.用户窗体常用控件
虽然VBA窗体开发所用的控件和VB较为类似,但其属性和方法和VB存在一定的差异:
(1)标签控件:
该控件用于显示不可编辑的文本,默认属性为Caption属性,默认事件为Click事件。
(2)文本框控件:
该控件用于显示可编辑的文本信息,是VBA开发中最常用编辑控件,默认属性为Value属性,默认事件为Change事件。
(3)复合框控件:
该控件将列表框和文本框进行结合,用户可进行输入和列表框选择操作,默认属性为Value属性,默认事件为Change事件。
(4)列表框控件:
该控件用于显示值列表,用户可选择一个或多个列表项,VBA中的列表框可通过列表形式和选项按钮或复选框的形式使用,默认属性为Value属性,默认事件为Click事件。
(5)复选框控件:
该控件用于显示选择的状态,即允许用户从两个值(如True或False)中选择一个。
如选择则将显示标记,默认属性为Value属性,默认事件为Click事件。
(6)选项按钮控件:
该控件用于显示多选项中每一项的选择状态,默认属性为Value属性,默认事件为Click事件。
(7)切换按钮控件:
该控件用于显示选择状态,默认属性为Value属性,默认事件为Click事件。
(8)框架控件:
该控件用于创建功能或视觉角度的控件组,默认事件为Click事件。
(9)命令按钮控件:
该控件用于启动、结束或中断操作,其Click事件是窗体编程中最常用的事件代码,默认属性为Value属性,默认事件为Click事件。
(10)表头控件:
该控件用于将一系列相关控件显示为一个多表的集合,默认属性为SelectedItem属性,默认事件为Change事件。
(11)多页控件:
该控件用于将多页面的内容以单个控件的方式实现,在处理不同类别的大量信息时很有用,默认事件为Change事件。
(12)滚动条控件:
该控件用于按滚动块位置,返回或设置变量值,默认属性为Value属性,默认事件为Change事件。
如需创建横向或纵向的滚动条,可在窗体设计时横向或纵向拖动滚动条控制点。
(13)旋转按钮控件:
该控件用于增加及减少变量数值,默认属性为Value属性,默认事件为Change事件。
(14)图像控件:
该控件用于显示图片,其支持的图片文件格式包括:
bmp、cur、gif、ico、jpg和wmf等,默认事件为Click事件。
在VBA窗体设计中,可将一些开发中使用的控件全部选择后,直接拖至工具箱中,工具箱会添加一个“控件组”,在窗体设计中可直接将该控件组放置于窗体,大大提高了效率(该特点为VBA所独有)。
如开发者需使用VBA标准控件箱未提供的其他控件,可右键单击工具箱,在出现的菜单中选择“附加控件”命令,在出现的对话框中进行选择即可。
3.用户窗体常用事件
用户窗体的常用事件和VB窗体有一定的区别。
(1)Initialize事件:
该事件发生在加载对象后和显示对象前,通常在该事件中初始化变量值或设置控件的属性。
(2)QueryClose事件:
该事件发生在用户窗体关闭前,通常在该事件中检查用户窗体中未完成的操作。
cancel参数:
整型,如将该参数设置未非零值,则可阻止关闭用户窗体。
Closemode参数:
该参数用于获取触发QueryClose事件的原因。
(3)Terminate事件:
该事件将所有引用的对象变量设置为Nothing常量,即删除对象的引用。
该事件发生在卸载对象后。
如非正常退出程序,则不会触发。
(五)类模块
VBA开发也提供了类模块结构,使开发者可将常用操作通过类进行合理封装,实现代码的复用和程序的结构化。
1.创建类模块
VBA中创建类模块非常简单,在VBA编辑器的工程资源管理器中右键单击项目,在出现的菜单中选择“插入→类模块”命令,随后在“工程资源管理器”中会出现添加的类模块,默认名称为“类1”,单击该类模块,可设置其属性,一般需设置其“Name”属性,以方便使用。
双击该类模块,即可按窗体的操作方法来输入代码。
2.类模块常用事件
类模块中包含Initialize和Terminate二个事件。
该事件用于初始化类模块所用的数据。
当程序中创建类模块时触发该事件。
(2)Terminate事件:
当程序中类实例从内存删除时触发该事件,且该事件仅在程序正常结束时触发。
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- ExcelVBA 自定义 工具栏