分享

Excel VBA 动态插入控件代码

 冷茶视界 2023-11-15 发布于江苏

☆本期内容概要☆

  • VBA动态插入控件代码

动态插入控件参数:1、控件类型;2、控件Name,注意不是Caption。

动态插入命令按钮(CommandButton):

Dim dynamicButton As ControlSet dynamicButton = Me.Controls.Add("Forms.CommandButton.1", "dynamicButton")

动态插入复选框(CheckBox):

Dim dynamicCheckBox As ControlSet dynamicCheckBox = Me.Controls.Add("Forms.CheckBox.1", "dynamicCheckBox")

动态插入选项按钮(OptionButton):

Dim dynamicOptionButton As ControlSet dynamicOptionButton = Me.Controls.Add("Forms.OptionButton.1", "dynamicOptionButton")

动态插入文本框(TextBox):

Dim dynamicTextBox As ControlSet dynamicTextBox = Me.Controls.Add("Forms.TextBox.1", "dynamicTextBox")

动态插入标签(Label):

Dim dynamicLabel As ControlSet dynamicLabel = Me.Controls.Add("Forms.Label.1", "dynamicLabel")

动态插入下拉列表框(ComboBox):

Dim dynamicComboBox As ControlSet dynamicComboBox = Me.Controls.Add("Forms.ComboBox.1", "dynamicComboBox")

注:代码参考AI生成内容,略作修改。


    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多