OptionButton1.2.3がうまく動かない
セルA1,B1,C1に1、2、3のいずれかを選択して記入させられるマクロを作成したく、以下のようなマクロを試作しましたが期待どうりに行きません。添削いただけると幸甚です。UserForm1(UF1)に3つのComandButton(CB)を設置し、CB1にUF2が、CB2にUF3が、CB3にUF4がそれぞれ表示(.Show)され、UF2,3,4には其々3つのOptionButton(OB)と1つのCBを設け、UF2に次のコードを記載:
OB1.Value=True Then→Range(“A1”)=1
OB2.Value=True Then→Range(“A1”)=2
OB3.Value=True Then→Range(“A1”)=3
UF3、UF4ではA1替えてB1、C1にします。
するとUF2/CB1(A1)はコマンド実行でOB1.2.3の選択ができA1に1、2、3を取得させられるのですが、UF3/CB2(B1)とUF4/CB3(C1)は動作してくれないんです。
UF2,3,4コード同等なのに、何故???
添削または貴方なりのマクロ記載頂ければ有り難く宜しくお願い致します。
お礼
kkkkkmさん お世話になります。 そういうことだったのですね。解決しました。 ボタンのボッチはクリアされても、TabIndexが0にされていたことで、あたかも一番最初に選択されているかのように振舞ってしまっていたという結果でした。 各ページ内にもうひとつずつ実はボタンが配置されているのですが、ページ1だけは、そのもう一つのボタンのTabIndexが0になっていました。 なので、ページ1から3まで、全てのページで、そのもう一つのボタンのTabIndexを0に設定することで、解決しました。 ありがとうございました。