3

OK、これまでに Office-2010 を 3 ～ 4 回アンインストールして再インストールし、3 日間何時間もの調査を行いましたが、成功しませんでした。Vbscript または Excel VBA からこのエラーが発生し始め、数か月間機能していた同じコマンドを実行しました。何を変更したかはわかりません。原因となる変更をしたことは覚えていませんが、ReadOnly:=Trueパラメーターに釘付けになりました。レジストリに何か問題があるのではないかと思いますが、再インストールすれば直りますか? しませんでした...

とにかく、Excel 2010 に記録した非常に単純なコマンドです。このコマンドは正常に機能し、ファイルが開きます。

Sub Macro1()
     Workbooks.Open Filename:="C:\temp\file_9928_131101.xlsx"
End Sub

しかし、ReadOnly:=Trueパラメーターを追加すると、機能しません:

Sub Macro1()
     Workbooks.Open Filename:="C:\temp\file_9928_131101.xlsx", ReadOnly:=True
End Sub

返されるエラーは次のとおりです実行時エラー '1004' オブジェクト 'Workbooks' のメソッド 'Open' が失敗しました:

[デバッグ] をクリックすると、コードの唯一の行にエラーが表示されます。

4

8 に答える 8

5

ファイルが壊れています。別の名前で再保存し、関数内の名前を変更します。それが機能することを試してから、ファイルの名前を好きなように変更してください。

それは私にとってはうまくいき、ファイルが破損していました。読み取り専用で問題ありません。

于 2013-12-10T11:56:47.260 に答える
3

この問題を抱えていて、通常の解決策が機能しない私のような他の人のために、ここに答えを入れてください。

この別の潜在的な原因は、一時ファイルの破損です。開こうとしているファイルがネットワーク ドライブまたは他のリモート ホスト上にある場合にのみ適用されると思います。

%temp%とにかく、一時フォルダー ( Windows エクスプローラーに入力した場合に表示されるフォルダー) を消去してから、コンピューターを再起動してみてください。

于 2015-02-10T17:36:43.930 に答える
1

これが遅いことは承知していますが、破損したワークブックを開いて自動的に修復する場合は、次を使用します。

Set oWB = Workbooks.Open(Filename:="C:\my\file\path.xlsx", CorruptLoad:=XlCorruptLoad.xlRepairFile)
于 2018-08-24T09:50:57.813 に答える
0

外部ソース (電子メールなど) からファイルをダウンロードする場合は、電子メールから直接ファイルを開き、ファイルを保存します。マクロでファイルを開いてみてください...うまくいくことを願っています...うまくいきました....:)

于 2015-08-02T22:32:51.457 に答える
-2

私はこれに遅れて答えていることを知っていますが、VBAがターゲットマシンに正しくインストールされていることを確認することで、同様の問題(同じエラーですが.NetアプリからExcelを実行しています)を解決しました。

[コントロール パネル] -> [プログラムと機能] -> [プログラムのアンインストール]... Office インストールを見つけ、右クリックして [変更] を選択します -> [機能の追加] -> [Office 共有機能] -> [Visual Basic for Applications] -> [マイ コンピューターから実行]

これは私のためにそれをしました。

于 2016-12-19T19:49:33.783 に答える