Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


10661 / 13644 ツリー ←次へ | 前へ→

【20492】オプションボタンについて わさ 04/12/10(金) 13:40 質問[未読]
【20497】Re:オプションボタンについて Jaka 04/12/10(金) 14:17 発言[未読]
【20509】Re:オプションボタンについて わさ 04/12/10(金) 17:06 質問[未読]
【20511】Re:オプションボタンについて 角田 04/12/10(金) 17:15 回答[未読]
【20512】Re:オプションボタンについて わさ 04/12/10(金) 17:19 質問[未読]
【20513】Re:オプションボタンについて Asaki 04/12/10(金) 19:06 回答[未読]
【20600】Re:オプションボタンについて Jaka 04/12/13(月) 9:18 回答[未読]

【20492】オプションボタンについて
質問  わさ  - 04/12/10(金) 13:40 -

引用なし
パスワード
   質問です。
オプションボタンのグループ化が分かりません。
どのようにしたらよいのでしょうか?
よろしくお願いします。

【20497】Re:オプションボタンについて
発言  Jaka  - 04/12/10(金) 14:17 -

引用なし
パスワード
   意味が良くわかりませんけど、ここ見てみると良いかも..。
http://www.h3.dion.ne.jp/~sakatsu/Excel_Tips10.htm

【20509】Re:オプションボタンについて
質問  わさ  - 04/12/10(金) 17:06 -

引用なし
パスワード
   たとえば、コントロールツールボックスでオプションボタン男性・女性の二つと、
10代・20代の二つで、計4つのボタンをワークシート上に配置して、
性別、年齢それぞれを選択できるようにしたいのですが、4つのうち、1つしか選択できません。
性別のグループ、年代のグループのようにしたいのですが。
よろしくお願いします。

【20511】Re:オプションボタンについて
回答  角田 WEB  - 04/12/10(金) 17:15 -

引用なし
パスワード
   こんにちは。
> 男性・女性の二つと、
>10代・20代の二つで、
>4つのうち、1つしか選択できません。
既定では、[GroupName]がシート名で入りますので、1シート内では
選択がひとつだけになります。

>性別のグループ、年代のグループのようにしたいのですが。
プロパティの[GroupName]をグループごとに同じ名前となるように変更して下さい。

【20512】Re:オプションボタンについて
質問  わさ  - 04/12/10(金) 17:19 -

引用なし
パスワード
   それはフォーム上の事ですよね。
やはりフォーム上でしか出来ないのでしょうか?
出来ればワークシート上?で行いたいのですが・・・。

【20513】Re:オプションボタンについて
回答  Asaki  - 04/12/10(金) 19:06 -

引用なし
パスワード
   こんにちは。

>それはフォーム上の事ですよね。
>やはりフォーム上でしか出来ないのでしょうか?
>出来ればワークシート上?で行いたいのですが・・・。
シート上でもオブジェクトを右クリックするなどしてプロパティは表示できますから、
同じように設定可能です。

【20600】Re:オプションボタンについて
回答  Jaka  - 04/12/13(月) 9:18 -

引用なし
パスワード
   オプションボタンのプロパティでGroupNameを男女、年代に分ければできます。

ただ、グループ分けしてもオブジェクト名のNoは、同じにできないからこんな感じで判定する必要があります。

For i = 1 To 6
  With Worksheets("Sheet1").OLEObjects("OptionButton" & i).Object
     If i <= 2 Then
      kk = "男女"
     Else
      kk = "年代"
     End If
     MsgBox kk & "の区分けは、" & .Caption & " " & .Value
  End With
Next

10661 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free