エクセルＶＢＡ 「本日」の日付を検索したいのですが

質問

お世話になります。

シートを開いたときに、日付列を検索して本日と同じ日付（日付列に本日と同じ日付がなければ、前日や前々日など、近い日）の一番最初のセルをアクティブにしたいのです。

素人なのですが、教えていただけるでしょうか。

理由ですが、

エクセルで文書受付簿をつくり、利用しています。

受付簿であるシート名　台帳　　で受付記録をしているのですが、

別シート　　コピー用『前年度』データ　　　というものを作ってあります。
それは、前年度の受付内容をコピーしたものであり、必要なセルをダブルクリックするとシート　　台帳　　の最終行に貼り付けるようにＶＢＡを組んでいます。

（毎年同じ件名の文書が来る場合は、ダブルクリックするだけで入力できるので、手間が省けます）

同じ件名の文書は、だいたい同じ時期に来るので、シート　　コピー用『前年度』データ　　　を開いた際に、日付列を検索して本日と同じ日付（日付列に本日と同じ日付がなければ、前日や前々日など、近い日）の一番最初のセルをアクティブにしたいのです。
ただし、まったく同じ日に去年も同じ件名の文書がくるわけではないので、同じ日を抽出するのではなく、検索してセルをそこに合わせるということをしたいのです。

コピー用『前年度』データ　　　の状況は、
Ａ列は日付です。この日付は、表示は「月日」のみですが、数式バーには2006/4/5と表示されるように、年の情報も入っています。年は無視して、月日だけで検索したいのです。

一日に20件以上受付するので、日付も同じ日が20行近く続いて次の日の受付データに変わります。その日のまとまりの中で、一番上の行に合わせたいのです。

Ｂ列は相手先が入っています。

Ｃ列は文書の件名が入っています。

つたない説明ですが、お分かりいただけたでしょうか？

よろしくお願いいたします。

回答No.3

fly_moon · ベストアンサー

こんにちは。横から失礼します。

私もNayuta_Xさんの意見に賛成です。
確かにVBAでやれますが、その必要があるとは思えないし、どうしてもやりたいなら自分で試行錯誤されてから解らない部分を質問されてはどうですか？

>Ａ列の日付は、ほとんど日付順に並んでいます。
>現在は、手動で本日の日付近辺をスクロールして表示させています。
それなら、毎日スクロールして目的のセルをアクティブにして保存すれば少しのスクロールで済むんじゃないですか？そういう手間を全て省きたいならVBAを勉強するっていう手間を惜しまないで下さい。

お礼

確かにおっしゃるとおりです。

ＶＢＡ辞典を参照はしてみたものの、うまくいかなかったもので質問させていただきました。

もう少し調べて、解決しなければ再度質問したいと思います。

ありがとうございました。

回答No.2

Nayuta_X

追加です。

VBAに、こだわっていませんか?。
エクセルなら、データ⇒並べ替え　で、簡単に出来ますよ。

補足

ありがとうございます。

Ａ列の日付は、ほとんど日付順に並んでいます。

現在は、手動で本日の日付近辺をスクロールして表示させています。

その操作の手間を省こうと、ＶＢＡなら・・・と思った次第なのです。

回答No.1

Nayuta_X

いまいち内容が解らないです。

>エクセルで文書受付簿をつくり、利用しています<
>別シート コピー用『前年度』データというものを作ってあります<
とありますが、これらの関連が、不明です。

それとも、これらに関係なく　シートを開いたら　今日の日付　または、最新の日付の入った　セルをアクティブにすれば、良いのでしょうか??。
それだと、>台帳　の最終行に貼り付けるようにＶＢＡを組んでいます。< が、問題になりそうですね。(見ずらくなりそう)
同じ年月日が、複数あったら　どうしたいのですか?。

私だったら、新しいものは、常に　一行目に挿入する方法を考えます。
そうすれば、検索などせずに　シートを開けば、直ぐに　解ることですから。

補足

つたない説明で申し訳ありません。

私のイメージでは、

このシート　"コピー用『前年度』データ"　を開いたときに、
Ａ列にあらかじめ入力されている日付を検索し、パソコンの"本日"と同じ列にセルを合わせて欲しいのです。
（他のシートとの関連はないと思いましたが、念のため質問文に入れてしまいました）

同じ月日が多数あるので、その場合は一番上のセルをアクティブにしたいのです。

また、同じ月日が無い場合は、その近い日（前日や前々日など）をアクティブにしたいのです。

年は去年の年ですので違うのですが、月日だけを検索の対象としたいのです。

この説明でよろしいでしょうか。

よろしくお願いいたします。