こんにちは。宮本と申します。VB6(SP5)で、
プログラミングをしております。
下記の様にプログラミングをしましたが、どうしても
[実行時エラー’1004’ test_1.xlsにアクセスできません]と、なります。
c:\test.xls は、元々ある事を前提とし、c:\test_1.xlsに上書きをしたいのです。
宜しくお願い致します。
Dim wApp As Excel.Application
Dim wExl As Object
Set wApp = CreateObject("Excel.Application")
Set wApp = CreateObject("Excel.Application")
Set wExl = wApp.Workbooks.Open("c:\test.xls")
wExl.Worksheets(1).Cells(1, 1).Value = 3000
wExl.Application.Visible = False
wExl.Application.DisplayAlerts = False
wExl.SaveAs "c:\test_1.xls" <---ここで、エラー
No.5
- 回答日時:
1回目にキッチリ終わっていないので、2回目にエラーになるのでは?
CloseやSet Nothingをしてますか?
参考URL:http://oshiete1.goo.ne.jp/goo_search.php3?dummy= …
No.4
- 回答日時:
こんにちは、ats8181oyajiです
ごめんなさい。説明が足りませんでした
引数が違うエラーはSaveでファイル名を書くと
出ます。Saveは今開いているファイルを上書き
保存する場合に使います。
今回の場合は
test_1.xlsについては新規に一回だけ作成するのですか?
ならば、テストで一回目はSaveAsで正常にできますが
(当方テスト済み)二回目はエラーになります。
ようするに、正しい処理です。
しかし、何度も同じtest_1.xlsに書き込みが発生する
のでしたら、上記のことを考慮する必要があります。
いつでも書き換えるのであれば
1.test_1.xlsの存在チェックで、あればkillで削除
2.SaveAsで新規名前付け保存
で可能かと思います。
No.3
- 回答日時:
こんにちは、ats8181oyajiです
SaveASとSaveの違いなのでは?
SaveASは初回のみ、すでに存在するときはエラーです
二回目以後はSaveを使います。
この回答への補足
ご回答をありがとうございます。
>SaveASとSaveの違いなのでは?
書き換えてみました。が、今度は、
[実行時エラー'450' 引数の数が一致していません。
または、不正なプロパティを指定しています。]
と、なってしまいました。(;_;)
原因は、No.1さんのおっしゃる様に他に原因が
あるような気がしてきました。
No.1
- 回答日時:
VBがないのでWSHのVBScriptで試したところ、
c:\test_1.xlsが別のエクセルで開かれていることが原因のようです。
Application.VisibleをTrueにしてみて確認してください。
または、Ctrl+Alt+Delのプログラムの強制終了画面でExcelというプログラムが動いていればそれを終了すればいいかも。
この回答への補足
ご回答をありがとうございました。
>Application.VisibleをTrueにしてみて確認
確認しました。c:\test.xls は、読み取り専用で開かれていました。が・・・それ、以外はありません。(;_;)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) このVBAでExcelアプリケーションを作成は必要ですか? 3 2023/07/19 21:13
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Visual Basic(VBA) VBAでファイルを開くプログラムがエラーです 2 2023/02/21 16:56
- Visual Basic(VBA) エクセルVBA Workbook変数に変数を使ったファイル名を格納したい 5 2023/06/13 14:46
- Excel(エクセル) Excel-VBAの「しばらくお待ちください」のダイアログが自動的に閉じない 2 2023/05/24 15:31
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- Visual Basic(VBA) excel vbaでvlooupの変数がわかりません。 7 2022/05/30 09:35
- Excel(エクセル) VBA フォルダ見える化のコードについて 2 2023/06/19 15:04
- Visual Basic(VBA) DisplayAlertsブロパティで ”実行時エラー424オブジェクトが必要です” 5 2022/05/15 18:02
- Visual Basic(VBA) Accessフォームで全レコードを指定のExcelのセルへ転送し印刷する方法について 2 2022/09/08 18:23
このQ&Aを見た人はこんなQ&Aも見ています
-
賃貸で可能な古民家風レトロな部屋作りのコツ!改めて知る畳の高い機能性と魅力も紹介
畳の部屋を雰囲気のよい部屋に仕上げたい!賃貸住宅でもできる古民家風のレトロな部屋作りのコツを伺った。
-
マクロの「SaveAs」でエラーが出るのを解消したいです(再)
Visual Basic(VBA)
-
マクロの「SaveAs」でエラーが出るのを解消したいです
Visual Basic(VBA)
-
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
-
4
特定のPCだけ動作しないVBAマクロがあります。その理由は?
Visual Basic(VBA)
-
5
Worksheets メソッドは失敗しました。のエラー処理のやり方
Visual Basic(VBA)
-
6
VBAマクロ 実行時エラーが出たり出なかったり
Excel(エクセル)
-
7
名前をつけて保存した後、元のファイルに戻るには
その他(コンピューター・テクノロジー)
-
8
VBA+VBSによる別インスタンスBookOpen時のVBSエラーに関して
Excel(エクセル)
-
9
Excelマクロのエラーを解決したいです。
Visual Basic(VBA)
-
10
エクセルでエラーが出て困っています。
Excel(エクセル)
-
11
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
12
SaveAsエラー回避
Excel(エクセル)
-
13
エクセルマクロでエラーの原因がわかりません。
Visual Basic(VBA)
-
14
読み取り専用ファイルを上書き保存するには?
Visual Basic(VBA)
-
15
実行時エラー 438になった時の対処法を教えて下さい。
Visual Basic(VBA)
-
16
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
17
エクセルのマクロで保存して終了が出来ない
Access(アクセス)
-
18
VBAのFileFormatで悩んでいることがあるので助けていただけないでしょうか?
Visual Basic(VBA)
-
19
エクセルVBAで値の貼り付けができない
その他(Microsoft Office)
-
20
バッチファイルからVBA実行でエラー
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Debug Assertion Failed?
-
VBAでFormat がうまく使えない
-
Web.Config 構成ファイルのエラー
-
NET USE コマンドでエ...
-
Access ADOで文字列を日付型へi...
-
エラーコード 70 「書き込み...
-
POV-Ray についての質問です!
-
C# HttpWebRequestのエラーにつ...
-
bcpadがうまく実行できないので...
-
WNetAddConnection*()の使い方
-
シェルスクリプトの実行エラー...
-
aspxをサーバーで表示すること...
-
「メープルストーリー」をイン...
-
ファイルのダウンドードでエラー
-
たまにブルースクリーンが発生...
-
エクセルでエラーコードがでま...
-
PowerPoint(.pptx)ファイルをPD...
-
不明なソフトウェア例外(0xe06...
-
WAV,MP3はCD-Rの品質に左右され...
-
携帯で撮った 写真を パソコ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAでFormat がうまく使えない
-
Debug Assertion Failed?
-
NET USE コマンドでエ...
-
POV-Ray についての質問です!
-
Excel ファイルに保存すると実...
-
不明なソフトウェア例外(0xe06...
-
ホームページビルダーの”全体の...
-
シェルスクリプトの実行エラー...
-
vbaでファイルを開くパス名に変...
-
エラーコード 70 「書き込み...
-
図形のクリアで実行時の1004エ...
-
ACCESS VBAのOpenForm書き方
-
Web.Config 構成ファイルのエラー
-
Access ADOで文字列を日付型へi...
-
C# HttpWebRequestのエラーにつ...
-
LTspiceのTime Stepエラーについて
-
bcpadがうまく実行できないので...
-
VB5のEXEの起動時エラー
-
xmlドキュメントから別拡張子で...
-
VBAで印刷するとエラーになって...
おすすめ情報