深圳office培训 深圳excel培训
深圳excel培训 深圳office培训
咨询服务
深圳office培训
深圳office培训
office培训
excel培训
ppt培训
vba培训
access培训
word培训
visio培训
project培训
outlook培训
数据库培训
深圳access培训
深圳sql培训
深圳office培训
 

vba中的工具栏及其控件对象


2016年8月10日 作者: 来源:

 VBA和其他面向对象的开发语言类似,同样有非常多的对象组成,且不同的Office成员即提供了大量的开发对象,如工具栏、Office助手、内置对话框和窗体等。

(一)工具栏及其控件对象

在Office中通过VBA开发工具栏和菜单,需使用Office提供的CommandBar、CommandBarButton、CommandBarComboBox等对象,这些对象即代表工具栏、工具栏按钮和工具栏下拉框,通过这些对象可编制出各类复杂的工具栏或菜单。

1.CommandBars集合

该集合代表Office所有的工具栏,可用名称或索引号指定菜单栏或工具栏,但仅可用名称指定一个菜单、快捷菜单或子菜单。如两个或两个以上自定义菜单或子菜单名称相同,则返回第一个具有该名称的对象。

其Add方法用于新建一个工具栏,并返回 CommandBar对象。

语法:expression.Add(Name, Position, MenuBar, Temporary)

参数说明:

Name为可选的Variant 类型,代表新工具栏的名称。如果省略,则使用默认的名称;Position为可选的Variant

类型,代表新工具栏的位置。该参数值可通过VBA常量进行设置,如msoBarLeft、msoBarTop、msoBarRight、msoBarBottom常量(设置新工具栏位于软件工具栏中位置);msoBarFloating常量(代表新工具栏可移动);msoBarPopup常量(代表新工具栏为快捷菜单)等;MenuBar为可选的Variant

类型,用于设置是否用新工具栏替换活动工具栏;Temporary为可选的Variant 类型,用于设置新工具栏是否暂时有效。

2.CommandBar对象

该对象代表应用程序中的工具栏,新建工具栏的控件均以该对象为载体。

(1)Controls属性:返回CommandBarControls对象,代表指定工具栏中的所有控件。

(2)NameLocal属性:返回由应用程序版本语言所设置的工具栏名称,如对软件的内置工具栏设置会出现错误。

(3)Position属性:返回或设置工具栏的位置,值可通过VBA常量进行设置,如msoBarLeft、msoBarTop、msoBarRight、msoBarBottom、msoBarFloating、msoBarPopup或msoBarMenu等。

(4)Type属性:返回或设置工具栏的类型,值可通过VBA常量进行设置,如msoBarTypeNormal(工具栏为普通类型)、msoBarTypeMenuBar(工具栏为菜单类型)、msoBarTypePopup(工具栏为弹出菜单类型)等。

(5)Reset方法:将内置工具栏重置为默认设置,在恢复软件原有工具栏或菜单时非常有用。重置内置工具栏将删除其中的自定义控件并恢复其内置控件。

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属性:返回或设置Visual Basic代码过程名(该代码过程不可使用参数),该过程将在单击按钮后运行。

(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属性:返回或设置Visual Basic代码过程名(该代码过程不可使用参数),该过程在单击或更改组合框控件值时运行。

(4)Type属性:返回或设置组合框控件的显示方式。

(5)AddItem方法:用于在组合框控件中添加一个列表项,且该组合框控件必须为自定义的控件。

(6)RemoveItem方法:用于从组合框控件中删除一个列表项。


阅读:1853 上一则:listview用法介绍 下一则:vba窗体开发中的控件对象

返回前页 返回顶部
温馨提示:本中心是深圳较为专业office培训机构、咨询及报名请先预约,电话:0755-82124110。
深圳地址:深圳红荔路四川大厦1109B-1110(3号龙岗线通新岭地铁站A出口10米)
热线:0755-82124110(福田、南山、宝安) 0755-22205758(罗湖、龙岗、龙华) 13510024571(东莞、惠州、珠海、广州)
北京地址:北京清华大学华业大厦三区三楼 版权所有:深圳万博计算机教育 粤ICP备11006947号-1
 
深圳信息系统项目管理师培训
深圳信息系统项目管理师培训 欢迎咨询!
您好!请点击这里咨询万博教育
深圳万博吴老师
您好!请点击这里咨询万博教育
深圳万博史老师
 
深圳信息系统项目管理师培训
深圳信息系统项目管理师培训