|
はじめまして、事務の仕事をしている、ミコと言います。
社内掲示板からエクセルに入れて、確認する仕事をして
いるんですが、こんなことができないかと思って質問し
ます。<(_ _)>
取り込んだエクセルは、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 で赤くみたいにしたいんですけど
日付だけ赤くなったりで出来ません><;
こんなことってできますか?
これができれば他にもこんな更新の掲示板があるので
すっごく助かるので、よろしくお願いします。
|
|