-PR-
解決
済み

Workbooks.openについて

  • 暇なときにでも
  • 質問No.12486
  • 閲覧数2904
  • ありがとう数1
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 70% (7/10)

超初心者です。
Workbooks.Openを使って他の任意のxslファイルを開きたいのですが、

Sub Test_FileOpen()

Workbooks.Open Filename = "c:\MyDocuments\data.xls"

End Sub

のように書いても

「実行時エラー'1004':
'False.xls'が見つかりません。ファイル名およびファイルの保存場所が正しいかどうか確認してください」

と言うアラートが出て上手くいきません。
ファイルのパスは何度も確認したので間違いはないです。
ちなみに同じフォルダに置いて、

Sub Test_FileOpen()

Workbooks.Open Filename = ThisWorkbook.Path & "\data.xls"

End Sub

とやっても同じアラートが出ます。
どこがおかしいのでしょうか?
原因が推測できる方、どうかご教授願います。
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

質問者が選んだベストアンサー

  • 回答No.1
レベル7

ベストアンサー率 83% (15/18)

これでよいと思います。

Workbooks.Open Filename:="c:\My Documents\data.xls"
又は
Workbooks.Open "c:\My Documents\data.xls"


*補足*

Filename = "c:\MyDocuments\data.xls" では
式と見なされてしまいます。
名前付き引数を指定する場合は、引数名と等号の間にコロンが
入ります (引数名:= 値)。詳しくは参考URL をご覧ください。

'My Documents' フォルダも既定では My と Documents の間に
半角スペースが入っています。

なお、モジュールの先頭に Option Explicit ステートメントを
付け、変数の明示的な宣言を強制しておくと、エラーの出方が
変わります (Filename を宣言していない限り)。
Filename は定義されていない変数と見なされるので、より
確認し易くなると思います。
[ツール] - [オプション] で変数の宣言を強制しておくと
よいでしょう。
お礼コメント
ta89

お礼率 70% (7/10)

bakaさん、ご回答有難うございます。
どうやら「:」が抜けていたのが原因のようです。
ちゃんと実行できるようになりました。
助かりました。
投稿日時 - 0000-00-00 00:00:00
-PR-
-PR-
このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
このやり方知ってる!同じこと困ったことある。経験を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ