投稿日	： 2004/02/19(Thu) 20:26
投稿者	： 黒影
Ｅメール	：
ＵＲＬ	：
タイトル	： Re^3: エクセルブックの更新と保存

> 又、そうしてデータを取り込んだExcelブックのファイル名を今日の日付で保存する事は
> 可能なのでしょうか？開いたExcelブックのファイルは、マスターとしてそのまま残したいのです。

とりあえずこっちだけ...
こんな感じでどうですか？
ダブらないように日付＆時間で（^^;）
日付だけの場合、既存すると確認メッセージが出る．．．と思います。

Option Explicit
Public Const G_svFolderName = "C:\Temp" <=グローバル変数の方がより良いかと．．．

Private Sub Save_Excel()
    dim svExcelName  as string

    svExcelName = Format(Date, "yyyymmdd") & "_" Format(Time,"hhmmss") & ".xls"
    xlsBook.SaveAs (G_svFolderName & "\" & svExcelName)

Snd Sub

★ - エクセルブックの更新と保存 - ののちゃん 02/18-22:38No.8032
• Re: エクセルブックの更新と保存 - 花ちゃん 02/18-23:47 No.8033
  • Re^2: エクセルブックの更新と保存 - ののちゃん 02/19-17:45 No.8041
  • Re^2: エクセルブックの更新と保存 - ののちゃん 02/19-18:33 No.8042
    • Re^3: エクセルブックの更新と保存 - 黒影 02/19-20:26 No.8043
    • Re^3: エクセルブックの更新と保存（追記） - 黒影 02/19-20:59 No.8044
      • Re^4: エクセルブックの更新と保存（追記） - ののちゃん 02/19-21:38 No.8045
        • Re^5: エクセルブックの更新と保存（追記） - 黒影 02/20-09:34 No.8053
          • ありがとうございました！！ - ののちゃん 02/20-21:20 No.8062
          • ありがとうございました！！Part 2 - ののちゃん 02/21-22:33 No.8072
            • 確認 - 黒影 02/23-12:57 No.8080
              • Re: 確認 - ののちゃん 02/24-18:44 No.8116