質問: Excelのマクロで次のことを実行したいです。 日付の列取得ができないので教えて欲しいです。 アルゴリズム 作業完了日(何年何月何日何時何分という形式)←B列 と 作業完了予定日(何年何月何日という形式)←C列 現在の日付より前の作業完了予定日のものの中で作業完了日が作業完了予定日よりも後ならば、作業完了日のセルを赤く塗るようにしたい。 これを実行するVBAを教えてください!
回答: マクロであれば For I = 2 To Cells(Rows.Count, "B").End(xlUp).Row If Cells(I, "C") < Date And Cells(I, "B") > Cells(I, "C") Then Cells(I, "B").Interior.Color = 255 End If Next でできますが これは マクロで行うべきではなく 条件付書式で B1セルに 条件式を =AND(TODAY()>C1,B1>C1) とし 適用先を =$B:$B とすれば 条件に 一致するB列の行が 赤くなります。 こちらの方が良いと思います。