[[20080225135008]]　『同じ日付ごとに行に色を付けたい』（とっちゃん）　ページの最後に飛ぶ

『同じ日付ごとに行に色を付けたい』（とっちゃん）

 　　a　 　b　 　c 　　・　・　・
 1　社名　日付　品名　・　・　・　・
 2
 3
 上記のような表が、いくつかの会社からテキストファイルで送られてきます。
 これをエクセルファイルにまとめ、日付で並べ替えてその日の各社の比較をしています。
 比較しやすくするために、日付ごとに行の色を変えたいのです。
 テキストファイルをまとめていますので関数は使えません。
 過去ログを見せていただきましたが探せません。
 教えていただけませんか？XPでエクセル２０００です。

 条件付き書式かVBAになると思います。
 条件付き書式で日付のシリアル値によって
 色を付ける方法がありますが、偶数日は青、
 奇数日は赤としても、休みなどの関係で違う
 日付だけど偶数日という日が続けて入ってい
 たら同じ色になって見分けが付きません。

 VBAなら色の数をもっと多く設定できますので
 見分けやすい色設定が出来ます。
 (MARBIN)

最初の日付のものの行に色を付け、次の日付のものの行には色を付けず、その次の日付のものの行に色をつけるというふうに交互に色を付けるというマクロを教えていただけませんか？（とっちゃん）

 同じ日付ごとにソートしてあるのなら、
 ループ処理でセルを見ていく方法があります。

 最初のセルの日付を取得、カウントを1
 ↓
 ループでセルの日付が１行前の日付と同じ場合→カウントアップしない
 セルの日付が１行前の日付と違う場合→カウントアップ
 カウントが奇数の場合→セルの色を付ける
 カウントが偶数の場合→何もしない
 (MARBIN)

 >テキストファイルをまとめていますので関数は使えません。
 影響の無い空き列　で数式は使えますよ。
 で条件付き書式で色を付ける

長らくエクセルに関心は持っているのですが、頭がついて行かず、マクロの記録の利用と他の方が作成したマクロを少し変えて利用しているだけの者です。MARBIN様のおっしゃることはなるほどとは思うのですがどうしたらいいのか全く分かりません。この学校は自分がやってみて、その過程で相談するところということを忘れていました。すみませんでした。（とっちゃん）

コメント返信：

[ 一覧(最新更新順) ]

[[20080225135008]] 『同じ日付ごとに行に色を付けたい』（とっちゃん） ページの最後に飛ぶ

[[20080225135008]]　『同じ日付ごとに行に色を付けたい』（とっちゃん）　ページの最後に飛ぶ