2017-05-03 307 views
0

ここには非常に小さなコードがあります。 私はオフィス03、07、10のバージョンで問題なくテストして働きました。 が、win7のとOffice 2007を実行している一台のマシン上でこの行には常に失敗:オブジェクトのワークブック」のメソッド 'Workbooks'オブジェクトの 'Open'が失敗しました

Set oWB = oExcel.Workbooks.Open("C:\myFile.xls") 

メソッド「オープン」の

に失敗した可能性のある解決策は何ですか? P.Sファイルが破損していません。

Dim oExcel As Excel.Application 
Dim oWB As Workbook 
Dim oWS As Worksheet 
Dim rRng As Excel.Range 

Application.ScreenUpdating = False 
Set oExcel = New Excel.Application 
Set oWB = oExcel.Workbooks.Open("C:\myFile.xls") 
Set oWS = oExcel.Worksheets(2) 
Set rRng = oWS.Range("C01:C500") 
oExcel.Visible = False 
+0

'Set oWS = oWB.Worksheets(2)'にする必要があるので 'Set oWS = oExcel.Worksheets(2)'で失敗するはずです。 'Dim oWB As Excel.Workbook'を試してみたらどうなりますか? –

+0

私はブックを読み込もうとすると、その行の前に問題が発生します。 – gtua

+0

ありがとうございます、Dim oWBをExcel.Workbookとして試してみます。リモートコンピュータなのでアクセスできませんが、後で結果を投稿します。 – gtua

答えて

0

ありがとうございました。

解決策が見つかりました。Foxitリーダーアドインが問題を引き起こしていました。一度すべて削除された が削除されました。

関連する問題