EXCEL VBA：窗体在运行的时候动态添加控件的代码

EXCEL VBA：窗体在运行的时候动态添加控件的代码 本文标签： EXCEL , VBA , 代码 , 动态 , 控件 , 添加 , 窗体 , 运行 在Excel的窗体里面，如何在窗体运行的情况下动态的添加控件呢？ 以下代码，以动态添加控件为例子，希望对你有帮助。 一、动态添加CommandButton命令按钮 Dim mc As CommandButton Static k k = k + 1 Set mc = Me.Controls.Add("Forms.Commandbutton.1") mc.Caption = k mc.Top = Me.Controls(k - 1).Top + Me.Controls(k - 1).Height Me.Controls.Remove "Commandbutton1" 二、动态添加文本框 Set   myText   =   Controls.Add( "VB.TextBox ",   "myTextBox ") With   myText .Visible   =   True .Text   =   "这是加载的动态控件 " .Width   =   3200 End   With 转载请保留链接: EXCEL VBA：窗体在运行的时候动态添加控件的代码