| 
    
     |  | はじめまして、事務の仕事をしている、ミコと言います。 社内掲示板からエクセルに入れて、確認する仕事をして
 いるんですが、こんなことができないかと思って質問し
 ます。<(_ _)>
 
 取り込んだエクセルは、E列に色々な簡易報告が書いて
 あって、蓄積していくので過去のものからいっぱい書か
 れています。(つぎ足し報告していく形です)
 
 これが2〜30行くらいあって、どこに最新の書き込み
 があるか簡単に分るようにしたいです。(・_・;)
 
 ちょっとだけマクロを使ったりしているんですけど、や
 りたいコトは、E2〜E30の間にある最近の書き込み
 文字を赤くしたいってコトです。
 
 
 ・書き込みは必ず <yyyy/mm/dd〜 で始まる。
 ・ひとつ前の人も書き込み書き始めは <yyyy/mm/dd〜
 だから、色変えの区切りはココまで。
 ・赤くしたいのは過去1週間の記述。
 ・同じE2に同じ週の書き込みは複数あります。
 ・下の例だと今日が2012/01/30なので後藤さん伊藤さん
 の書き込みが赤くて佐藤さんのはそのまま黒にしたいです。
 
 
 ┌─┬────────────────────┐
 |1|         E列                  |
 ├─┼────────────────────┤
 | |<2012/01/30 後藤>                 |
 | |簡単報告文文文文文文文文文文文文文文文  |
 | |文文文文文文文文文文文文文文文文文文文文|
 | |文文文文文文文文文文文文文文文。      |
 | |                               |
 | |<2012/01/25 伊藤>                |
 |2|簡単報告文文文文文文文文文文文文      |
 | |文文文文文文文文文文文文文文文文文文文  |
 | |文文文文文文文文文文。           |
 | |                             |
 | |<2012/01/15 佐藤>              |
 | |簡単報告文文文文文文文文文文        |
 | |文文文文文文文文文文文文文文文文文   |
 | |文文文文文文文文文文文文文文文文文文。 |
 | |                             |
 | |                             |
 ├─┼────────────────────┤
 |3|・・・・・・・・・・・・・・・                      |
 ├─┼────────────────────┤
 
 
 私が考えていたのは
 
 Mydata = Format(Date,"yyyy/mm/dd") &" "&Format(Date - 1,"yyyy/mm/dd") … -2 -3 -4- -5 -6
 
 みたいに7日分の日付を求めて変数に格納
 それを配列に入れて・・・
 日付をInStrで検索して〜.Font.ColorIndex = 3 で赤くみたいにしたいんですけど
 日付だけ赤くなったりで出来ません><;
 こんなことってできますか?
 
 これができれば他にもこんな更新の掲示板があるので
 すっごく助かるので、よろしくお願いします。
 
 |  |