エクセルチェックボックス

質問

エクセルのコントロールボックスでチェックボックスを使用したいんですがうまく使えません
ユーザーフォームは使用せず、セルに直接貼り付けを考えてます
このチェックボックスは複数使用したいと思っています

具体的な例としてチェックを入れたらセルにリンクして数字を動かしたい
チェックしたら１　はずしたら２を入れる
ＩＦ関数との連結を考えています

当方の使用環境はWindows Vista , エクセル２００７を使用しています

よろしくお願いします

回答No.1

kuma3f · ベストアンサー

思われていることと違っていましたらすみませんが、
チェックボックスのあるシートのコードに下記の
コードを記述したらできると思います。

Private Sub CheckBox1_Change()
If CheckBox1 = True Then
Range("B1") = 1
Else
Range("B1") = 2
End If
End Sub

例は、CheckBox1にチェックを入れたらＢ１に１、
チェックを外したらＢ１に２が入るようにしています。

お礼

お世話になりました
思っていた通りに動きました

回答No.4

Wendy02

こんばんは。

If 構文は必要ないと思います。

Private Sub CheckBox1_Click()
　Range("A1").Value = 2 + CInt(CheckBox1.Value)
End Sub

回答No.3

imogasi

シートに直接、コントロールツールボックスの方のチェックボックスを複数貼り付ける。
各チェックボックスについて、デザインモードで右クリックでプロパティウインドウを出し、LinkedCellにA1とかアドレス文字を入れる。
次のチェックボックスはA2という風に。
ーー
A1にはチェックボックスのON、OFFでTRUE、FALSEが入るから
B1にでも
=IF(A1=FALSE,2,1)
と入れると良い。TRUE、FALSEはそのまま式中に書いてよい。
うまくいけば書式でFALSE－－＞２、TRUE－－＞１に出来るかも知れないが、成功してない。
ユーザー定義で
[=1]"ON";[=2]"OFF";G/標準
までは出来たが。

回答No.2

koko88okok

詳しいことは分かりませんが、下記URLのページが参考になりませんか？

「Excel2007(エクセル2007)基本講座:フォーム コントロールの使い方」
http://www.eurus.dti.ne.jp/~yoneyama/Excel2007/excel2007-form.html

「Excelでオプションボタン！」
http://kokoro.kir.jp/excel/form-option.html