こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

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

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

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

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

よろしくお願いします

投稿日時 - 2008-03-20 16:24:29

QNo.3879450

困ってます

質問者が選んだベストアンサー

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

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

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

投稿日時 - 2008-03-20 18:02:49

お礼

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

投稿日時 - 2008-03-20 21:32:19

ANo.1

このQ&Aは役に立ちましたか?

2人が「このQ&Aが役に立った」と投票しています

回答(4)

ANo.4

こんばんは。

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

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

投稿日時 - 2008-03-20 19:43:49

ANo.3

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

投稿日時 - 2008-03-20 18:20:39

ANo.2

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

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

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

投稿日時 - 2008-03-20 18:03:43

あなたにオススメの質問