VBA专题10-12:使用VBA操控Excel界面之在功能区中添加自定义组合框控件

excelperfect

经过本系列前面几篇文章(参见:VBA专题10-11:使用VBA操控Excel界面之在功能区中添加自定义拆分按钮控件VBA专题10-10:使用VBA操控Excel界面之在功能区中添加自定义切换按钮控件VBA专题10-9:使用VBA操控Excel界面之在功能区中添加自定义按钮控件)的学习,我们对于在功能区中添加自定义控件的步骤应该很熟悉了。

同样,这里讲解的添加组合框控件的步骤与前面介绍的步骤相同,新建一个启用宏的工作簿并保存,关闭该工作簿,然后在CustomUI Editor中打开该工作簿,输入下面的XML代码:

重新打开该工作簿后,在“Custom”选项卡中显示含组合框的组,如下图1所示。

图1

在VBE中添加回调代码:

'Callback for comboBox1 onChange

Sub Combo1_onChange(control As IRibbonControl, text As String)

MsgBox '在组合框中显示的文本是: '& text

End Sub

此时,从组合框中选择某项后,会显示如图2所示的消息框。

图2

小结:经过前面几篇文章的学习,我们应该熟悉在功能区中添加自定义控件的步骤通常有两大步,即首先编辑其XML文件添加界面元素,然后添加代码以实现功能。后续文章中,我们将进一步加深这方面的认识和理解。

说明:本专题系列大部分内容学习整理自《Dissectand Learn Excel VBA in 24 Hours:Changingworkbook appearance》,仅供学习研究。

(0)

相关推荐