このトピックに書きこむ |
---|
Re[4]: 複数シートを2シートずつPDF化する方法について | |
---|---|
[195926] Re[4]: 複数シートを2シートずつPDF化する方法について- ■記事引用/メール受信=OFF■ □投稿者/ kazuo -(2023/09/12(12:50)) □U R L/ 向こうは解決になっており、 >追記です。 >その後、1回目のPDF処理コードの後に�Asheet3をアクティブにするコード>worksheets("sheet3").Activate」と入力し、再度PDF処理すると2シートずつPDF化は出来たのですが、「Worksheets(Array(sheet3, sheet4)).Select」のコードで、「sheet3」or「sheet4」のどちらかがアクティブになる訳ではないのでしょうか? >また、このような同じコードの内容を()内だけ変更し動かすという処理は、Excel側に余計な負担をかける等はないでしょうか? の質問はマルチポストとは言えないのではないでしょうか? この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他 |
[195925] Re[3]: 複数シートを2シートずつPDF化する方法について- ■記事引用/メール受信=OFF■ □投稿者/ IT -(2023/09/11(19:51)) □U R L/ ttps://www.excel.studio-kazu.jp/kw/20230911111104.html?t=174531 マルチホスト |
[195924] Re[2]: 複数シートを2シートずつPDF化する方法について- ■記事引用/メール受信=OFF■ □投稿者/ kazuo -(2023/09/11(19:00)) □U R L/ ttps://excelfactory.net/excelboard/excelvba/excel.cgi?mode=all&namber=195476&rev=0 投稿者/ kazuo -(2023/01/04(10:15)) >作業グループマクロの副反応は何があるのか無いのか良く解らないので、私としては使わない・薦めないこととします。 ということで、 >Excel側に余計な負担をかける等はないでしょうか? もう既に実施してしまったのでしょうし、回答になってはいないでしょうが、 除外シートを非表示にして ttps://learn.microsoft.com/ja-jp/office/vba/api/excel.workbook.exportasfixedformat で実行させることをお勧めします。 excel2016 |
[195923] Re[1]: 複数シートを2シートずつPDF化する方法について- ■記事引用/メール受信=OFF■ □投稿者/ ぽて -(2023/09/11(13:50)) □U R L/ 追記です。 その後、1回目のPDF処理コードの後にAsheet3をアクティブにするコード「worksheets("sheet3").Activate」と入力し、再度PDF処理すると2シートずつPDF化は出来たのですが、「Worksheets(Array(sheet3, sheet4)).Select」のコードで、「sheet3」or「sheet4」のどちらかがアクティブになる訳ではないのでしょうか? また、このような同じコードの内容を()内だけ変更し動かすという処理は、Excel側に余計な負担をかける等はないでしょうか? この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他 |
[195922] 複数シートを2シートずつPDF化する方法について- ■親トピック/記事引用/メール受信=OFF■ □投稿者/ ぽて -(2023/09/11(13:27)) □U R L/ お世話になります。 ご質問させて下さい。 Excelにて4シートに分かれている資料を 2枚ずつPDF化したいと思っております。 【詳細説明】 Sheet1〜sheet4まである資料を、PDF出力すると「sheet1とsheet2」で1PDF。 「sheet3とsheet4」で1PDF。としたい。 現状は、ネットの見よう見まねで下記のように同じ処理を繰り返すコードを入れましたが、この方法だとなぜかsheet1のみPDF化になります。 2シートずつPDF化するコードは、どのように記載すればいいのでしょうか? '複数シートを選択状態にする Worksheets(Array(sheet1, sheet2)).Select 'PDF作成 ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=ファイル名 '複数シートを選択状態にする Worksheets(Array(sheet3, sheet4)).Select 'PDF作成 ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=ファイル名 宜しくお願い致します。 この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他 ++++++++++++++++++++ OS ⇒OTHER Version⇒OTHER ++++++++++++++++++++ |