Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

60432 / 76736

←次へ　｜　前へ→


	【20943】Re:フォルダー（該当月21日～翌月20日サイクル）のファイル作成について

Asaki - 04/12/27(月) 10:00 -


	引用なし

	パスワード

>１月分のフォルダーには･･･→「12月21日から１月20日」までのファイルが入る必要があります。
>最後にいただいたコードを動かすと「明細表17-01月分\明細票01-26」となります。
>これでは無く「明細表17-01月分\明細票12-26」とならないとだめなんです。
再三書いていますが、一番最初に書き込みされた仕様なら、↑になるのです。
「最後のコード」といっている 04/12/21(火) 21:49 の書き込み時点では、
>１２月２１日には、「明細表１７－０１月分」のフォルダーに「明細表01-21」のファイルに仕上げたいのですが
という仕様でした。

この件は、04/12/22(水) 9:20 の書き込みで
>MsgBox "明細表" & Format(dt2, "e-mm") & "月分\明細表" & Format(dt1, "mm") & "-" & Format(dt1, "dd")
>にしてください。
と訂正していますので、これなら上手く良くと思いますが、もうちょっと修正して

MsgBox "明細表" & Format(dt2, "e-mm") & "月分\明細表" & Format(dt1, "mm-dd")
でどうでしょうか。

勿論、
MsgBox "明細表" & Format(dt2, "e-m") & "月分\明細表" & _
　　Format(Date, "mm-dd") & ".xls"
でもかまいません。

0 hits

▼

【20830】フォルダー（該当月21日～翌月20日サイクル）のファイル作成について YN61 04/12/21(火) 19:12