こんなマクロ作れますでしょうか。 ------------------------------------------ カレンダーがあります。

Excel | Visual Basic31閲覧xmlns="http://www.w3.org/2000/svg">50

ベストアンサー

0

ThanksImg質問者からのお礼コメント

ありがとうございました!

お礼日時:5/6 11:46

その他の回答(2件)

0

下記では いかがですか For I = 2 To Cells(Rows.Count, "AL").End(xlUp).Row If Cells(I, "AL") >= Cells(32, "AI") And Cells(I, "AL") <= Cells(33, "AI") And Cells(I, "AN") <>"×"Then Range("AO"&I &":CG"&I).ClearContents Range("AO"&I &":CG"&I).Interior.Pattern = xlNone End If Next ただし 塗りつぶしは 手動で 色を付けた場合です。 条件付書式で 色を付けている場合は 条件付書式に 従います。 色は 条件付き書式で塗るべきかと

0

>こんなマクロ作れますでしょうか。 行いたい事の手順が判っていたら、可能だと思います。 後は、知識の問題。