投稿日	： 2004/02/18(Wed) 22:38
投稿者	： ののちゃん
Ｅメール	： nonochan@ccn.aitai.ne.jp
ＵＲＬ	：
タイトル	： エクセルブックの更新と保存

最近はじめてVB6.0で作っています。(「VBレスキュー(花ちゃん)」さんには感謝しております)
データベースのクエリから既存のエクセルシートにデータを移して(エクセル側から「外部データの取り込み」をしています)、そのシートを更新してから保存したいのですが、更新する前に「保存する為に、データの更新を中断しますか？」と尋ねられ、「はい」なら更新せずに保存してしまいますし、「キャンセル」なら、更新はするものの、その後保存されません。一体、どうしたらいいんでしょうか？「xlBook.Save」を省けば更新するだけですし．．．コードは以下の通りです。どこに問題があるのか、また解決法をご指南いただきたいのですが、よろしくおねがいします。

    Dim xlApp As Excel.Application
    Dim xlBook As Excel.Workbook
    Dim xlSheet As Excel.Worksheet

    Set xlApp = CreateObject("Excel.Application")
    Set xlBook = xlApp.Workbooks.Open("***.xls")

    xlApp.Visible = True
    xlApp.ActiveWorkbook.RefreshAll
    xlBook.Save

    Set xlSheet = Nothing
    Set xlBook = Nothing
    Set xlApp = Nothing

★ - エクセルブックの更新と保存 - ののちゃん 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