2016-07-29 28 views
0

部品表(BOM)と部品リストを比較するためにVBAプログラムを実行しようとしていますが、ファイルを開くときに問題があります。そうする。私は "Workbooks.Open(BomName)"でランタイムエラー '1004'を取得します。ファイルは同じフォルダにあります。何かアドバイス?彼らは同じフォルダにしているので、私はまた、フォルダの場所を表すために文字列変数を使用して、推薦workbookname.xlsx \:C:ランタイムエラー1004:Excel VBAで開くファイルが見つかりません

'1. Imput BomName 
    Dim BomName As String 
    BomName = InputBox("Enter BOM to check") 
     If BomName = "" Then 
      Exit Sub 
     Else 
      'continue program 
     End If 

    '2 Open BomName File & Vantage Parts File 
    Workbooks.Open (BomName) 
    Workbooks.Open ("Part Last Cost Demand wMin Qty.xlsx") 
+0

です。MSDNのドキュメントを読むと、わかりやすくなります。https://msdn.microsoft.com/en-us/library/office/ff194819.aspx –

答えて

0

は、次のようなBOMブックにフルパス名を入力してみてください。それでは、あなたがする必要があるのはworkbooks.open(path & BomName)

+0

ありがとうございます!パス変数を追加することは、魅力的に機能しました! :) –

+0

素晴らしい!助けてうれしい! – Jason

関連する問題