締切済み

エクセルのフォームのチェックボックスについて

2010/10/11 10:02

エクセルのフォームのチェックボックスについてあるセルにフォームのチェックボックスを付け、そのセルに、true・falseの条件設定をしました。その設定を利用して、条件式書式の設定で、 trueの時にとなりのセルを赤にするようにしました。以上のような行が1500行あります。 1つ1つ設定するのが困難のため、マクロが使えるフォームのチェックボックスを使用しようと試みております。しかし、マクロ内のVBAの記述方法が解りません。（1行だけなら解ります）ご存知の方がおられましたら教えてください。よろしくお願いいたします。

hatohato1234
お礼率0% (0/2)

Visual Basic
回答数1
ありがとう数0

みんなの回答 （1）
専門家の回答

みんなの回答

hoiho14000
ベストアンサー率26% (12/45)

2010/10/11 11:45 回答No.1

フォームのチェックボックスって何ですか？フォームとはユーザーフォームの事ですか？それともワークシートのチェックボックスを言っているのでしょうか？前者だとユーザーフォーム上には1500個もそれを作成することはできません一番簡単なのはチェックボックス用のフィールドを作成し Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Select Case True Case Not Intersect(Target, Range("a2:a1000")) Is Nothing If ActiveCell.Value = "" Then ActiveCell.Value = "ｖ" Else ActiveCell.Value = "" End If End Sub こんな感じでセルにチェックを入れるのですこのチェックについてループ処理をかければいいのです For Each C In Range("a2:a1000") If C.Value="V" Then 　処理１　Else 処理２　End If Next

ログインすると、全ての回答が全文表示されます。