- ベストアンサー
【VBA】複数シートをWorksheetにset
- Excel2010のVBAにおいて、Worksheetオブジェクトに、複数シートの値を格納させることが出来ず困っています。
- MAINSHT_MULTIというWorksheetオブジェクトに、複数のシートを設定するコードを記載していますが、エラーNo.13が発生してしまいます。
- 実現したいことは、worksheetオブジェクトに格納されたシートを１つのPDFに出力することです。
- enjik333
- お礼率75% (3/4)
- その他（プログラミング・開発）
- 回答数3
- ありがとう数2
- みんなの回答 （3）
- 専門家の回答
質問者が選んだベストアンサー
Sub test() Sheets(Array("A", "B", "C", "D", "E")).Select ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="C:\out.pdf" End Sub 複数シートをオブジェクト変数に格納することはできません。 手作業で行う場合でも、シートを選択してからPDF出力されるかと思います。 VBAにおいても、複数シーtを「select」してから出力してください。 1つのシートにまとまります。
その他の回答 (2)
- eden3616
- ベストアンサー率65% (267/405)
No2で訂正です。 >1つのシートにまとまります。 １つのPDFファイルにまとまります。
- neKo_quatre
- ベストアンサー率44% (735/1636)
前提条件として、どういうブック、シートがあって、具体的に、何を元に、何を、どうしたらどうなるハズが、どうなるから困ってるのか？不明瞭です。 > Worksheetオブジェクトに、複数シートの値を格納させることが出来ず困っています。 ABCDEの順に上書きで格納するんなら、最後に格納したEになればいいの？ A～Eは新規のシートなの？既存のシートなの？ならば同じブックにあるの？ > そもそも、これは無理なことなのでしょうか？ コードを見ると、WorksheetにWorkbookを放り込もうとしてる様に見えるし。 > もともと実現したいことは、 これが出来なくて、迷走してわけの分からない事やろうとしてるようにも見えるし。 まずは、 自分が何をどうしたいのか？ 問題点は何なのか？ Excelのマクロ、VBAの操作ならそもそもそれは手作業で出来る事なのか？その手順は？ なんかを整理することからでは。
お礼
ご指摘頂きありがとうございます。 おっしゃることはごもっともでございます。 自身の整理のためにも記載しますと、 ＞自分が何をどうしたいのか？ ⇒シートをselectせずに、１つのPDF出力モジュールで、 任意のシート数を１つのPDFファイルに出力したい ＞問題点は何なのか？ ⇒既存の知識で上記を達成することは可能だが、 selectしactiveシートを出力する、というステップを 省略可能なのかテストしたところエラーがでた。 方法が悪いのか、仕様上の問題なのか判断がつかなかった。 その他、いろいろ言葉足らずの部分があったと思います。 失礼しました。
お礼
早々のお返事ありがとうございます。 オブジェクト変数だけでやろうとするのは、 仕様上不可能なんですね。 大変参考になりました。 また宜しくお願い致します。