Excelスプレッドシートにあるボタンがあります(ユーザーフォームにはありません)私は自分のユーザーフォームのテキストボックスに名前を入力し、それから自分のExcelシートにある自分のボタンのキャプションをに設定するときに、テキストボックスがオンになっています。テキストボックスに入力された内容どのコードを使用する必要があり、そのコードをどこに挿入するのかを知りたいですか。
理にかなっていることを願って、私はこれに初心者であることを覚えておいてください。だからコードをどこに挿入するかを尋ねているのです。
事前に多くの感謝
回答:
回答№1は1TextBox1という名前のテキストボックスを想定したユーザーフォームのコードは、次のようになります。
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
または、入力時にキャプションを更新したい場合は、
Private Sub TextBox1_Change()
If Len(Me.TextBox1.Text) > 0 Then _
ActiveSheet.Buttons("Button 1").Caption = Me.TextBox1.Text
End Sub
回答№2の場合は1
"CommandButton"(これはActiveXコントロールです)を使用していますが、フォームコントロールに向かっているように見えますが、必要な2つの方法を試してみました。
ActiveX:
ActiveSheet.Shapes("YourButton").OLEFormat.Object.Object.Caption = "YourText"
フォーム:
ActiveSheet.Shapes("YourButton").TextFrame.Characters.Text = "YourText"