Excel VB 点击按钮在现有的Userform上创建一个按钮并保存改按钮的带码在VBA 内，

这是一个可以回答的技术问题。在Excel VBA中，可以使用以下代码来创建一个按钮并保存其代码：

Sub CreateButton()
Dim newButton As Object
'创建一个新的CommandButton对象
Set newButton = ThisWorkbook.VBProject.VBComponents("UserForm1").Designer.Controls.Add("Forms.CommandButton.1")
'给按钮设置名称和显示文本
newButton.Name = "Button1"
newButton.Caption = "点击我"
'给按钮设置位置和大小
newButton.Width = 80
newButton.Height = 30
newButton.Top = 50
newButton.Left = 50
'给按钮设置执行的代码
newButton.OnClick = "Button1_Click"
'保存新创建的按钮的代码到VBA
ThisWorkbook.VBProject.VBComponents("UserForm1").CodeModule.InsertLines _
ThisWorkbook.VBProject.VBComponents("UserForm1").CodeModule.CountOfLines + 1, _
"Private Sub Button1_Click()" & vbCrLf & _
" '在这里编写按钮点击后要执行的代码" & vbCrLf & _
"End Sub"
End Sub

请将上面代码中的 UserForm1 和 Button1 替换成您自己的代码。