[[20150708141135]]　『VBA　実行時エラー』（未知の世界）　ページの最後に飛ぶ

『VBA　実行時エラー』（未知の世界）

AAAAA.xlsmというエクセルファイルを別名保存(新しく名前をつけて、同じフォルダ内に保存)
しようとしているのですが、

『実行時エラー1004

SaveAsメソッドは失敗しました　Workbookオブジェクト』

となります。

ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & あいうえお & ".xlsm"

間違い箇所を教えて下さい。
よろしくお願いします。

＜使用 Excel：Excel2007、使用 OS：Windows7 ＞

 Option Explicitの設定を行っているだろうか？
 (VBエディタのツール-オプションの編集で「変数の宣言を強制する」にチェックを入れているか）

 また、「あいうえお」という変数があるのだろうか？

 もし、両方違うのであれば「あいうえお」が「"」で囲まれていないので「あいうえお」という変数とみなされ、
 中身がからとみなされているのではないか。

 ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & "あいうえお" & ".xlsm" 
 または
 ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\あいうえお.xlsm" 
 としてはどうか？
（ねむねむ） 2015/07/08(水) 14:26

変数の宣言の強制はしていませんでした。
あいうえおという変数はありません。

前に誰かが作っていたVBのその部分だけをコピーでもっていき、
名前のところだけ変えて使っていました。変数は""で囲まないんですね。

""で囲ったらすぐにうまくいきました！

ありがとうございました。<m(__)m>

（未知の世界） 2015/07/08(水) 14:39

コメント返信：

[ 一覧(最新更新順) ]

[[20150708141135]] 『VBA 実行時エラー』（未知の世界） ページの最後に飛ぶ

[[20150708141135]]　『VBA　実行時エラー』（未知の世界）　ページの最後に飛ぶ