No.2ベストアンサー
- 回答日時:
No.1です!
たびたびごめんなさい。
前回書き忘れたのですが、
2月以降の場合の数式は
=MONTH(A1)=2
といった具合でOKです。
Excelの場合
空白 = 0 = 1900/1/0
と判断してしまうようで、空白すべてが1月と判断されます。
この際ですので余計なお世話かもしれませんが、前回の別案のマクロの一例です。
↓の画像のようにSheet2のA列に1~12月の色(見えにくい場合はフォントの色も)設定しておきます。
そしてSheet1のA列1行目からデータがあるとして・・・
画面左下のSheet1のSheet見出し上で右クリック → コードの表示 → VBE画面に
↓のコードをコピー&ペーストしてマクロを実行してみてください。
(Alt+F8キー → マクロ → マクロ実行です)
Sub test() 'この行から
Dim i, k As Long
Dim ws As Worksheet
Set ws = Worksheets("Sheet2")
Application.ScreenUpdating = False
With Columns(1)
.Interior.ColorIndex = xlNone
.Font.ColorIndex = xlAutomatic
End With
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row '←データが2行目からなら、1 を 2 に!
k = Month(Cells(i, 1))
With Cells(i, 1)
.Interior.ColorIndex = ws.Cells(k, "A").Interior.ColorIndex
.Font.ColorIndex = ws.Cells(k, "A").Font.ColorIndex
End With
Next i
Application.ScreenUpdating = True
End Sub 'この行まで
※ 条件付書式が設定してある場合はマクロでも色変更ができませんので
マクロでやる場合は条件付書式はすべて削除しておきます。
長々と失礼しました。m(_ _)m
この回答へのお礼
お礼日時:2012/07/05 10:47
ご丁寧にマクロまでありがとうございます。
条件付書式でも上手くいきましたがマクロでやってみました。
VBAを頑張って覚えます!
有難うございました。
No.1
- 回答日時:
こんにちは!
仮にA列のシリアル値に色付けするとします。
1月の場合だと、
A列全てを範囲指定 → 条件付書式 → ・・・ → 数式欄に
=AND(A1<>"",MONTH(A1)=1)
として → 書式から好みの色を選択しOK
同様に2月~12月までを設定します。
※ 数式内のA1部分は範囲指定した最初(一番左上)のセル番地です。
※ 別案として、別Sheetに12色の色を設定しておき、それを表示させる方法もあります。m(_ _)m
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 条件付き書式 一致する曜日の列にある○のセルに色を付けたい 2 2022/04/19 05:40
- Excel(エクセル) エクセルの数式で教えてください。 2 2023/01/10 09:15
- その他(Microsoft Office) EXCELのセルへの色づけ 2 2023/06/07 01:22
- Excel(エクセル) エクセルの祝日に色が反映しない 4 2022/05/18 09:58
- Excel(エクセル) 現時点の年齢を算出して、その年齢と一致したセルを色付けしたい。 4 2022/06/23 17:49
- Excel(エクセル) エクセルの数式で教えてください。 2 2023/04/13 10:55
- Visual Basic(VBA) VBA初心者です。 VBAで行単位で条件付き書式の色をカウントしたいです。 大量のデータがあるExc 3 2022/06/08 10:02
- Visual Basic(VBA) VBA初心者です。 VBAで行単位で条件付き書式の色をカウントしたいです。 大量のデータがあるExc 3 2022/06/08 10:00
- Excel(エクセル) Excel 数式を使用した条件付き書式が、一つのセルにしか反映されない 3 2022/06/08 23:20
- その他(Microsoft Office) 従業員増減対応で当番種類の増減対応な当番表 21 2022/07/19 07:30
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
セルを結合したA4とA5の条件付...
-
excel:条件付き書式の適用範囲...
-
左列の文字の色と同じ文字の色...
-
条件付き書式のやり方。隣のセ...
-
Excelで表を作り、自動で今月の...
-
色のリンクは出来ますか?【エク...
-
Excelで社歴管理をしており4年...
-
Excel2010 日付列を結合した予...
-
ある倍数だけを塗りつぶす方法 ...
-
エクセルの条件付き書式による...
-
エクセル 条件付書式で時刻の...
-
未来の日付日欄を無色(空白)...
-
エクセルの折られたセルを戻したい
-
エクセルで複数条件で複数セル...
-
EXCELで2つの条件設定で別のセ...
-
数字を入力するとセルに色が付...
-
条件付き書式設定で色をつけた...
-
「#N/A」のエラーを表示させな...
-
【Excel】ガントチャートの作成...
-
エクセルのスクロールなどがす...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
セルを結合したA4とA5の条件付...
-
excel:条件付き書式の適用範囲...
-
色のリンクは出来ますか?【エク...
-
Excelで表を作り、自動で今月の...
-
Excelで社歴管理をしており4年...
-
ある倍数だけを塗りつぶす方法 ...
-
左列の文字の色と同じ文字の色...
-
エクセル 条件付書式で時刻の...
-
条件付き書式のやり方。隣のセ...
-
【Excel】ガントチャートの作成...
-
数字を入力するとセルに色が付...
-
エクセルの折られたセルを戻したい
-
エクセルの条件付き書式による...
-
Excel2010 日付列を結合した予...
-
Excelの塗りつぶしの反映
-
EXCELで2つの条件設定で別のセ...
-
スプレッドシートにて、条件付...
-
Excelで隣のセルを参照し...
-
エクセルで
-
エクセル2010の書式の条件設定...
おすすめ情報