Excel VBA質問箱 IV

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

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


66358 / 76734 ←次へ | 前へ→

【14940】Re:自動実行で実行されません。
質問  しん  - 04/6/10(木) 21:18 -

引用なし
パスワード
   ▼IROC さん:
こんばんは、しんです。VBSありがとうございました。

IROCさんのVBScriptを下記のように少し手を加えて、ブックの保存と閉じるをできるようにしましたが、IROCさんのコード通り

xlApp.DisplayAlerts = False

にすると、TESTを行った結果(たとえば

Sub TEST
Cells(1,1).Value = "TEST"
End Sub

の実行結果(セルA1の内容がTESTとして表示される)のブック保存ができません。
TESTマクロの実行結果がブックに保存できるようにするには、下記コードをどのように加筆修正すればよいのか教えて頂けませんか?

Dim xlBook
Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = False
xlApp.DisplayAlerts = True  'ブックに保存するどうかの確認メッセージ
Set xlBook = xlApp.Workbooks.Open("C:\Sample2.xls")
xlApp.Run "TEST"
xlApp.Workbooks.Close  'ブックを閉じる
xlApp.Quit
Set xlBook = Nothing
Set xlApp = Nothing
1 hits

【14707】自動実行で実行されません。 なつお 04/6/5(土) 23:46 質問
【14709】Re:自動実行で実行されません。 かみちゃん 04/6/6(日) 7:27 発言
【14880】Re:自動実行で実行されません。 しん 04/6/9(水) 3:23 お礼
【14908】Re:自動実行で実行されません。 かみちゃん 04/6/9(水) 23:05 回答
【14912】Re:自動実行で実行されません。 しん 04/6/10(木) 0:06 お礼
【14914】Re:自動実行で実行されません。 IROC 04/6/10(木) 0:15 回答
【14918】Re:自動実行で実行されません。 しん 04/6/10(木) 0:48 お礼
【14935】Re:自動実行で実行されません。 IROC 04/6/10(木) 18:31 回答
【14940】Re:自動実行で実行されません。 しん 04/6/10(木) 21:18 質問
【14970】Re:自動実行で実行されません。 しん 04/6/12(土) 1:54 お礼
【14713】Re:自動実行で実行されません。 よろずや 04/6/6(日) 11:35 回答

66358 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free