• 締切済み

Excelマクロでオプションボタンの名前の変更をしたい

Excelのマクロでオプションボタンを設定したのですが、表示する 名前を変えることができません。 マクロで表示する名前を変える方法を教えてください お願いします。

みんなの回答

  • nishi6
  • ベストアンサー率67% (869/1280)
回答No.3

マクロ実行中に、シート上のオプションボタン『OptionButton1』のCaptionを『新しいCaption』に換えてしまいます。 こういう質問でした? 下は標準モジュールに貼り付け。Sheet1のオプションボタンを操作しています。 Sub CaptionChange()   Worksheets("Sheet1").OLEObjects("OptionButton1").Object.Caption = "新しいCaption" End Sub

tomozii
質問者

お礼

ありがとうございます。うまくいきました^^

  • imogasi
  • ベストアンサー率27% (4737/17070)
回答No.2

オブジェクト名.Caption="男"とかのことですか。 実行中変えないのなら、貼りつけた時にプロパティウインドウでCaption行に例えば「男」と打ちこめば、設定できますが。

  • LinkZero
  • ベストアンサー率38% (5/13)
回答No.1

・オプションボタン上に表示する文字の変更の場合   ボタンの上で右クリック→テキストの編集 ・マクロ名称自体の変更の場合  メニューバー「ツール」→「マクロ」→「マクロ」 変えたいマクロを選択「編集」 マクロ編集画面が開いたら、「sub ***()」の***の部分を変更し、マクロ編集画面を閉じる。 するとマクロの名前が変わります。変わるはずです。

tomozii
質問者

補足

説明が下手でごめんなさいM(__)M マクロ内でオプションボタンを設定し、 その表示される文字を変えたいということです。 オプションボタンを設定すると Optionbotton1となってしまいます。 この表示を他の文字に変えたいということです。 宜しくお願いします。

関連するQ&A