こんにちは！日付が入り毎日日付の変わるBOOK名をマクロでアクティブに

質問

こんにちは！日付が入り毎日日付の変わるBOOK名をマクロでアクティブにする方法を
教えて下さい。
例）BOOK名：受注残データ(100420)で、括弧内の日付が変化する。

日付が固定の時は判るのですが．．．Windows("受注残データ(100420).lst").Activate

日付が変わっても、ＢＯＯＫ名を変更ぜずにアクティブにしたいのですが、どの様にすれば良いのか
判りません。教えて下さい。
よろしく、お願い致します。

回答No.1

samtomsan · ベストアンサー

> 日付が変わっても、ＢＯＯＫ名を変更ぜずにアクティブにしたいのですが

ここの意味がちょっと判りませんが

Dim ddd As String
ddd = Date
ddd = "受注残データ(" + Mid$(ddd, 3, 2) + Mid$(ddd, 6, 2) + Right(ddd, 2) + ").lst"

Windows(ddd).Activate

お礼

こんにちは！

samtomsanさん、ご回答ありがとうございました。
ご指摘の通り、質問に説明不足がありました．．．すみません。
『最新に日付(今日)のBOOKをアクティブにしたい』が、抜けていました。

ご回答頂いた、構文で早速実行してみました。

上手く動きました！！
やりたかった事が出来て、うれしいです。

質問内容説明不足にもかかわらず適切な回答を頂き、
ありがとうございました。