• ベストアンサー

ExcelのVBAのチェックボックスについて(初心者です)

こんばんは。 今、VBAのチェックボックスに関して勉強中です。 チェックボックスを配置しているセルを指定することは 可能なのでしょうか? チェックボックスにチェックをつけた際、 その行の背景色を変更するという処理を行いたいのです。 どなたか、アドバイスをお願いします。

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

  • ベストアンサー
  • nishi6
  • ベストアンサー率67% (869/1280)
回答No.1

CheckBox1をシートに貼り付けての説明です。 >チェックボックスを配置しているセルを指定することは可能なのでしょうか? 行:CheckBox1.TopLeftCell.Row 列:CheckBox1.TopLeftCell.Column >チェックボックスにチェックをつけた際、その行の背景色を変更するという処理を行いたいのです。 こんな感じでしょうか。チェックを付けると、その行を赤く塗ります。 Private Sub CheckBox1_Click()   With CheckBox1     If .Value = True Then       Rows(.TopLeftCell.Row).Interior.ColorIndex = 3     Else       Rows(.TopLeftCell.Row).Interior.ColorIndex = xlNone     End If   End With End Sub

samsom
質問者

お礼

大変遅くなり、申し訳ございません! ありがとうございます☆!!やりたかったことが出来て、 大変満足しています(≧∀≦) 本当に感謝いたします!!

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (1)

noname#187541
noname#187541
回答No.2

こんばんは。 >チェックボックスにチェックをつけた際、 >その行の背景色を変更するという処理を行いたいのです。 チェックボックスはクリックでオン/オフをするのですが、オンの時は「TRUE」、オフの時は「FALSE」という値を返します。 この値をセルに表示させることが可能です。 フォームの場合は「コントロールの書式設定」のコントロールタブで「リンクするセル」のセル番地を入力します。 コントロールツールボックスの場合は「プロパティ」の「LinkedCell」にセル番地を入力します。 以上のようにしてセルにチェックボックスの値を表示させていけば この値と「条件付き書式」を使えば、行の背景色を変えることが可能です。 どうでしょうか。

samsom
質問者

お礼

お返事遅くなり、申し訳ありません! とてもわかりやすく教えてくださり、感謝です! 条件付書式を用いるというのは思いつきませんでした☆ とても上手くいきました! 本当にありがとうございます(≧∀≦)♪

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • Excel VBA 条件を満たしたセル上にあるチェックボックス

    Excel2003を使用しています。 Sheet1のN4セルの値と同じ値が入力されているセルをSheet2のA列(A1:A50)から検索し、その行のB列に配置されているチェックボックスにチェックをつけたいのですが、そのチェックをつけたいチェックボックスを指定する方法がわかりません。 検索してヒットしたセルの1つ右隣のセルにチェックボックスが配置されているということで myNum = Sheets("Sheet1").Range("N4").Value Rng = Sheets("Sheet2").Range("A1:A50").Find(myNum) としたとして、Rng.Offset(, 1).Address と、チェックをつけたいチェックボックスの左上のセルアドレスを比較すればいいのかな?と思っているのですが、そのチェックボックスをどのようにしたら指定できるでしょうか? また、別の方法もありましたら、アドバイスをいただけると嬉しいです。 よろしくお願いします。

  • エクセルVBAでのチェックボックス操作

    エクセルを利用した、VBAで困っています。 所定のsheetに埋め込まれたチェックボックスに対して、 別sheet内のセルの値を参照し、結果をオン、オフという 操作を行いたいのですが、チェックボックスに対するVBAでの指定方法 が分かりません。 イメージとしては (1)Sheet1内にチェックボックスがある。  該当チェックボックスは7個のチェックボックスで構成されており  それぞれにchb1~chb7といったオブジェクト名がある。 (2)sheet2のA1セルに特定の値が入っていればチェックボックス(chb1)  がオン値がなければオフのまま (3)sheet2のB1セルに特定の値が入っていればチェックボックス(chb2)  がオン値がなければオフのまま という感じです。 先方より指定された様式なのでsheet1の内容や書式を変更することが出来ないので、なんとか埋め込まれたオブジェクトを操作したいのですが・・・ 良い方法があれば教えてください。

  • Excel VBAのチェックボックスについて

    こんばんは、Excel vbaのチェックボックスについてご教授をお願いします。 Userformを作成しています。 チェックボックスを横に4つ配置したとします。その際、常にどれか一つのチェックボックスにしかチェックできないようにしたいのです(チェックしたあとに、違うチェックボックスにチェックしたら、先にチェックしてあるのもはチェックを消したい)。 このような事をしたい場合、マクロ記述での操作になるのでしょうか?それとも、何か違う操作かコマンドがあるのでしょうか?4つ一組でたくさん並べたいので、すべてにマクロ記述となると大変かな?と思いまして・・・。もし、マクロ記述でしか方法が無い場合、マクロ記述の内容も教えて頂ければと思います。 申し訳ありませんが、よろしくお願いします。 ※Excel2000を使用しています。

  • エクセル2003VBA チェックボックスについて

    エクセル2003VBA チェックボックスについての質問です よろしくお願いします。    A         B 1 あああ       □ 2 いいい       □ 3 ううう        □ . . . . 35 かかか      □ 複数のチェックボックスをB列に配置し、 B1がオンになるとbook1を開く B2がオンになるとbook2を開く ・ ・ B35がオンになるとbook35を開く処理を行いたいのですが、 非常にコードが長くなってしまいます。 以下のコード以外で、 どのチェックボックスがオンになっているかを調べる方法が知りたいのですが、よろしくお願いします。 Private Sub CheckBox1_Click() book1を開く処理 End Sub Private Sub CheckBox2_Click() book2を開く処理 End Sub ・ ・ ・ Private Sub CheckBox35_Click() book35を開く処理 End Sub

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

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

  • エクセルVBA チェックボックスについて

    VBA初心者です。 あるシート(セル)に作った入力用チェックボックスにチェック(TRUE)を入れたときに、別シートの特定の位置に楕円を引きたいのですが、どのようなやり方があるでしょうか。 使い方は入力用シートと印刷用シートを分けて、入力用シートのチェックボックスの状態で印刷用シートの特定のセルに選択したことがわかるように楕円をつけたいというものです。 よろしくお願いします。

  • EXCEL VBA チェックボックスについて

    仕事上システムを作り始めたVBA初心者です。すみませんが、ご享受下さい。 ユーザーフォームにてチェックボックスを作成後、セルへ転載するものを作っております。 その中でチェックボックスが15個ほどあり、onの場合にはその行の25列目に"有"、OFFの場合は"無"と表示させたいのです。 現状はTRUEといった表示はされるところまではいったのですが、その先がどうしてもできません。 見よう見まねで始めた初心者ですので、コードもどこが必要かもあまりわからないのが現状です。お答え頂く上で必要であればアップしますので、よろしくお願い致します。尚、作ろうとしてるのはデータベースで設備項目に有、無をつける予定です。

  • Excel VBA フォーム上のコンボボックス

    Excel VBA フォーム上のコンボボックスの値リストが例えば5行あります。 3行目の行(値)の背景色を変更したいのですが出来ますでしょうか? よろしくお願いします。

  • エクセル VBA チェックボックスの制限について

    チェックボックス5個のうち 2つまでチェックを入れてもらい チェックボックスに対応する数値を セルに出力したいのです。 『実行』というボタンをつくったのですが、 チェックを入れ 実行ボタンを押し、 チェックが2つを超える場合に やり直しをさせるものを作りたいのです。 どなたかご教授お願いします。 VBA初心者です。

  • エクセルのチェックボックスについて

    チェックボックスが組み込まれているセルを含む行をコピーしましたが、一行目にチェックを入れると、コピー先のチェックボックスにまで一括して、レ点が入ります。 解消方法はありますか?