Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


11153 / 76735 ←次へ | 前へ→

【71122】エクセルで今日の日付文字から一定区間文字の色を変えたい
質問  ミコ  - 12/1/30(月) 20:35 -

引用なし
パスワード
   はじめまして、事務の仕事をしている、ミコと言います。
社内掲示板からエクセルに入れて、確認する仕事をして
いるんですが、こんなことができないかと思って質問し
ます。<(_ _)>

取り込んだエクセルは、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 で赤くみたいにしたいんですけど
日付だけ赤くなったりで出来ません><;
こんなことってできますか?

これができれば他にもこんな更新の掲示板があるので
すっごく助かるので、よろしくお願いします。
2 hits

【71122】エクセルで今日の日付文字から一定区間文字の色を変えたい ミコ 12/1/30(月) 20:35 質問
【71123】Re:エクセルで今日の日付文字から一定区間... ちん 12/1/31(火) 0:05 発言
【71136】大変参考になりましたっ! ミコ 12/1/31(火) 20:44 お礼

11153 / 76735 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free