• 締切済み

(VBAにて)背景色の設定について

(VBA)でマクロを作成しているのですが、下記の事が分からないので 教えてもらえないでしょうか? お願いします。 ・Excelで管理している障害管理表があります。 (管理表はこんな感じです。)     A         B       C        D     E 1  発生年月日    件名      内容      状況    完了日 2  (yyyy/mm/dd) (障害件名)  (障害内容)  (XXXX)  (yyyy/mm/dd) ・ ・ 300 ・D列の「状況」欄には、「完了」「調査中」「対応中」「顧客待ち」   が入力されています。(コマンドボタンからの選択ではなく、手入力です。) ・項目名は1行目です。 ・データ部分は、2行目~300行までです。 ・D列の「状況」欄をキーにして、「完了」と入力した行のみの背景色を黄色に反転させたいと思っています。  教えて下さい、お願いします。

みんなの回答

  • imogasi
  • ベストアンサー率27% (4737/17069)
回答No.2

条件付き書式でVBAでなくてもできます。 VBAでも マクロの記録でできます。 A2:E200を範囲指定。 操作は 書式 条件付書式 式が 式に =$d2="完了" $をつけること セルのパターン色書式設定 OK ーーー Sub Macro1() Range("A2:E300").Select Selection.FormatConditions.Delete Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=$D2=""完了""" Selection.FormatConditions(1).Interior.ColorIndex = 8 End Sub ーー これで変化させるところは,色コードしかない。 普通は Sub Macro2() With Range("A2:E300") .FormatConditions.Delete .FormatConditions.Add Type:=xlExpression, Formula1:="=$D2=""完了""" .FormatConditions(1).Interior.ColorIndex = 8 End With End Sub とするのかな。

  • hana-hana3
  • ベストアンサー率31% (4940/15541)
回答No.1

目的は解りますが、その程度の事なら「条件付き書式」でも可能です。 >(VBA)でマクロを作成しているのですが 作成中のマクロがどんな物なのか解りませんが、そこに組み込むのでしょうか? それとも、ワークシートイベントで動作する物にしたいのでしょうか? 基本的には、ループ文等を使ってセル内容をチェックして色の変更(設定)という手順になります。 Worksheet_Changeイベントプロシージャ http://www.relief.jp/itnote/archives/002293.php 背景色の設定 http://officetanaka.net/excel/vba/cell/cell05.htm http://www.relief.jp/itnote/archives/000482.php