質問: エクセルvbaでoptionbuttonのオンオフ取得 ワークシート上に貼り付けてあるオプションボタンの状態の取得ですが、フォームのオプションボタンなら 例えば、 msgbox activesheet.optionbuttons("option button 44").value で、オンなら1、オフなら-4146が返ります。 またactivesheet.optionbuttons("option button 44").value=xlonで オンに出来ます。 ところがフォームじゃないコントロールツールボックスのオプションボタンは msgbox activesheet.shapes("optionbutton30").valueでも msgbox activesheet.controls("optionbutton30").valueでもエラーになります。 どうやって取得すればいいのでしょうか? どうやてon off を指示すればいいのでしょうか?
回答: 同一ワークシート内にオプションボタン1つ、コマンドボタン一つを配置して、コマンドボタンに、現在のオプションボタンの値をmsgboxで表示させ、その後off(false)にするようなサンプルを作って、excel2000で試してみました。 private sub commandbutton1_click() msgbox optionbutton1.value optionbutton1.value= false end sub というコードです。 とりわけ問題なく動作しました。 linkcellを指定するかどうか、複数配置かどうかで微妙に動作が異なるようです。 参考までに。