エクセル（2003）変数について

質問

エクセル初心者です。会社で暇な時間に事務の効率化を目指してエクセルの勉強をしています。周囲にマクロ・VBAの分かる方がいないのでこちらで変数について質問させて下さい。

仮にAというBOOKがあったとして
Aを開くとウィンドウが出て、そこに日付を入れるだけで（例：2013.7）ある型通りの新規ファイルを作るマクロを作成したいのです。

Aのシート１に2013年7月1日から平日のみを抽出したカレンダーが作成され
平日の日数(count)が別セルで定義され

平日のみ抽出され0701、0702と記入されたセルを新規BOOK(仮にBとします）のシート名に
日数分-３をBOOK　Bのシート数にし

Aのシート２に書かれた内容をBのシートに全てコピーされる、というコードを書きたいと思っています。

all aboutの記事（http://allabout.co.jp/gm/gc/297751/）を参照していたのですが、３Pめの変数の部分でコードが上手く書けなくなり質問させて頂きたいと思いました。

sub 新しいBOOK()

dim bookname as string
bookname=range("a2").value

workbooks.add
activeworkbook.saveas
filename:="C:\"&bookname&".xls",fileformat:=_xlnormal,

end sub

のように記述したところ（実際のファイルはネットが繋がらないPCでやっているためコピペしていません。誤字があっても気になさらないで下さい；）、".xls"の部分で「コンパイルエラー」が出てしまいます。

どうにかして前に進みたいのですがいまいち分かりません。
原因は何なのでしょうか？

回答No.2

tsubuyuki · ベストアンサー

> activeworkbook.saveas filename:="C:\"&bookname&".xls",fileformat:=_xlnormal,

これで
> ".xls"の部分で「コンパイルエラー」
なのだとすると、十中八九、２つの「＆」の前後にスペースを入れると回避できます。

で、おそらくこれが通ると次に
「＿」の辺りで「不正な文字です」と怒られます。
ですので、これは削除しておきましょう。
ちなみにこれは、１行が長くなって見辛いときに
「次の行に続きますよ」と言う意味で使う記号ですので、
「＿」の後ろに文字は入れられませんよ、と言う意味のエラーです。

で最後にもう一つ
おそらく「修正候補：名前付き引数」と言うエラーが出ます。
行末が「，」で終わっちゃっているからです。
これも削除しましょう。
単純に「“，”があるのに引数が無いよ」と言う意味のエラーです。
この後ろに引数を入れないのであれば、「，」は不要です。

以上、３点ですね。

お礼

すばらしい回答ありがとうございます！　とても納得しました！
２点目まではきていたのですが、何でだかよく分からなくて・・・　とても助かりました。ありがとうございます！

回答No.1

mt2008

コンパイルエラーの場合、大抵単純な記述ミスです。
実コードのコピペがないと意味のない回答になる可能性大です。

転記ミスなのか、実際のコードがそうなっているのか解りませんが、
＆と変数、それに".xls"がくっついているせいじゃないでしょうか。
次のように変えてみて下さい。

filename:="C:\"&bookname&".xls"
↓
Filename:="C:\" & bookname & ".xls"