こちらですが、特別会員、通常会員、ビジターの3つのクエリを作成するということでしょうか?
考え方として、3つファイルを出力したいのなら3回出力処理をすればいいですよ。という内容ですね(質問がざっくりだったので)
「種別」が決め打ちできる程度なら決め打ちで作成してもいいですし、出力内容を自動認識させたいならそれはそれでやり方もあります。参考コードだけでやり取りするのは齟齬の元なのでまずは1ファイルでもいいので出力できるコードができてからですね
エラーが出ている部分は特別な処理をしていないよくあるEXCELファイルを開くだけなので原因はよくわかりません
.Workbooks.Open "C:\テスト\受注伝票テンプレート.xlsx"
のように直接記述すると動作しますか?
Debug.Print cstrTemplateDir & cstrTemplateBook
.Workbooks.Open cstrTemplateDir & cstrTemplateBook
として、エラーが出る直前でcstrTemplateDir & cstrTemplateBook
の内容を確認すると実際に存在するファイルパスになっていますか?
通報 ...