将单击的VBA功能分配给Excel Userform上的动态创建按钮

在这个问答内容中，我们需要创建一个Excel Userform，并在其上动态创建按钮，然后将单击的VBA功能分配给这些按钮。以下是一个简单的步骤来实现这个功能：

1. 打开Excel，然后按Alt+F11打开VBA编辑器。Private Sub UserForm_Initialize() Dim btn As Object Set btn = Me.Controls.Add("Forms.CommandButton.1", "Button" & Me.Controls.Count + 1, True) btn.Caption = "Click me" btn.Left = 10 btn.Top = 10 + (Me.Controls.Count - 1) * 25 btn.Width = 80 btn.Height = 25 btn.Visible = True End Sub这段代码将在Userform初始化时动态创建一个按钮，并将其命名为Button1。每次初始化时，它都会创建一个新的按钮，并将其命名为Button2、Button3等。
2. 在VBA编辑器中，点击Insert菜单，然后选择Userform。
3. 在Userform上，将一个按钮控件拖到表单上，并将其命名为DynamicButton。
4. 在VBA编辑器中，点击UserForm1，然后选择Code。
5. 在代码编辑器中，添加以下代码：
6. 在代码编辑器中，添加以下代码：Private Sub DynamicButton_Click() MsgBox "Hello, world!" End Sub这段代码将在单击按钮时显示一个消息框，其中包含文本“Hello, world!”。
7. 保存Userform，然后在Excel中单击Developer选项卡，然后选择Macros。
8. 在宏对话框中，选择UserForm1，然后单击Run。
9. 这将打开Userform，其中包含一个动态创建的按钮。单击该按钮，将显示一个消息框，其中包含文本“Hello, world!”。

这就是如何在Excel Userform上动态创建按钮并将单击的VBA功能分配给它们。