Excel VBA从用户窗体文本框中设置Commandbutton标题

我有一个Excel电子表格(不是在一个用户表单)的button,我有一个用户,有一个文本框,并希望它,当我在我的用户界面的文本框中input一个名称,然后设置标题我的excel表单上的button与在文本框中input的内容有关。 我想知道我需要使用什么代码以及在哪里插入代码?

希望有道理,请记住我是这个新手,所以这就是为什么我问在哪里插入代码

提前谢谢了

假设一个名为TextBox1的文本框,你的用户表单中的代码可能是这样的:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If Len(Me.Textbox1.text) > 0 then ActiveSheet.Buttons("Button 1").Caption = Me.Textbox1.text End If End Sub 

或者如果您希望在input时更新字幕:

 Private Sub TextBox1_Change() If Len(Me.TextBox1.Text) > 0 Then _ ActiveSheet.Buttons("Button 1").Caption = Me.TextBox1.Text End Sub 

正如你已经使用“CommandButton”(这是一个ActiveX控件),但似乎朝向一个窗体控件,我已经走了你将需要2种方法:

的ActiveX:

ActiveSheet.Shapes("YourButton").OLEFormat.Object.Object.Caption = "YourText"

forms:

ActiveSheet.Shapes("YourButton").TextFrame.Characters.Text = "YourText"