[[20061004041951]]　『初心者ですが、オプションボタンのグループ化について』　ページの最後に飛ぶ

『初心者ですが、オプションボタンのグループ化について』

 ９つのオプションボタン（コントロールボックスの）を使ってそれぞれ３つずつのグループにしたいのですが、
 それぞれのボタンのプロパティをどのようにしたらよろしいのでしょうか？

 　　　　　A            B             C             D

 1　　　○ボ１　　　　○ボ２　　　　○ボ３　　　　リンク1

 2      ○ボ４　　　　○ボ５　　　　○ボ６　　　　リンク2

 3      ○ボ７　　　　○ボ８　　　　○ボ９　　　　リンク3

　ボ1…ボ9は、オプションボタンの事で、リンク1に数字の1を入力するとボ1に、

 リンク2に5を入力するとボ5に、チェックが入るようにしたいのですが…

 よろしくお願いします。

（うん）

 >９つのオプションボタン（コントロールボックスの）を使ってそれぞれ３つずつのグループにしたいのですが、
 >それぞれのボタンのプロパティをどのようにしたらよろしいのでしょうか？

 プロパティのGroupNameで分ければ良いと思います。
 例えば
 OptionButton 1～3を　GroupName　1
 OptionButton 4～6を　GroupName　2
 OptionButton 7～8を　GroupName　3
 みたいに。
 GroupNameは（うん）さんの解り良い名前に変更して下さい。
 (MM)

 ありがとう　ございます。　
 グループ３つには分かれました。
 でも、Ｄ1～Ｄ3に数字を表す方法はどのようにしたらいいのでしょうか？

 (うん）

　さらにおしえてください。リンクの方法（うん）

 OptionButtonで選んだ数字をD列に表示するのですか？
 ((0))

そうなんです。（うん）

できるのでしょうか？（うん）

教えてください。（うん）

３つ以上をリンクさせるのは無理なんですか？（うん）

 そんなに、スレ上げをしなくても大丈夫ですよ＾＾
 ここの方達は、ちゃんと見てますから。
 たまたま、忙しかったりや週末などが重なってレスが付きにくいだけではないでしょうか？
　
 とは言うものの、ちょっとσ(^o^;)も挑戦してみました。
 叩き台程度に検証してみてください。
　
１）各オプションボタンのプロパティの「LinkedCell」をオプションボタンがあるセル位置で指定。
　　A1 の、オプションボタンには「A1」を
　　B1 の、オプションボタンには「B1」を・・・
　　（別に何処でもいいんですよ。作業列ですから）
２）D1 =SUMPRODUCT((A1:C1=TRUE)*({1,2,3}+(ROW(A1)-1)*3))
　　以下コピー
　
 何分、初挑戦な作業なので違うかもしれませんが。。。
 （キリキ）（〃⌒o⌒)b

 OptionButtonを1～9まで下記を参考に書いて下さい。
 とりあえず1～3まで書いています。
 解らなければ再度質問して下さい。
 (OKAYAMA)
 '--------------------------------------
 Private Sub OptionButton1_Click()
  Call OptBut
 End Sub
 '--------------------------------------
 Private Sub OptionButton2_Click()
  Call OptBut
 End Sub
 '--------------------------------------
 Private Sub OptionButton3_Click()
  Call OptBut
 End Sub
 '--------------------------------------
 Private Sub OptBut()
 Select Case True
    Case OptionButton1: Range("D1").Value = 1
    Case OptionButton2: Range("D1").Value = 2
    Case OptionButton3: Range("D1").Value = 3
 End Select
 End Sub
 '--------------------------------------

（キリキさん・OKAYAMAさん　ありがとうございます。）

 できました。

 ちなみにキリキさんの方法で4個、5個を1つのグループにしたときは
 式のどこの数値を変更したらよいのでしょうか。
 何度もすみません。

 こうでしょうか？
　
 E1 =SUMPRODUCT((A1:D1=TRUE)*({1,2,3,4}+(ROW(A1)-1)*4))
 （キリキ）(〃⌒o⌒)b

　ありがとうございます。

 さらに質問よいですか？
 リンクするセルが連続していなかった場合は
 どのように作ったらよいのでしょうか？（うん）

 時間が無いので、手っ取り早くやる方法！
　
	[A]	[B]	[C]	[D]	[E]	[F]	[G]	[H]	[I]
[1]	◎ボ１		○ボ２		○ボ３		○ボ４		1
[2]	○ボ５		○ボ６		○ボ７		◎ボ８		8
[3]	○ボ９		○ボ１０		◎ボ１１		○ボ１２		11
　
 I1 =SUMPRODUCT((A1:H1=TRUE)*({1,0,2,0,3,0,4,0}+(ROW(A1)-1)*4))
　　以下コピー
　
 （キリキ）(〃⌒o⌒)b

ありがとうございました。（うん）

コメント返信：

[ 一覧(最新更新順) ]

[[20061004041951]] 『初心者ですが、オプションボタンのグループ化について』 ページの最後に飛ぶ

[[20061004041951]]　『初心者ですが、オプションボタンのグループ化について』　ページの最後に飛ぶ