現在,相対記録で作成したマクロを使っています。
Sub 予定表印刷()
ActiveCell.Range("A1:I53").Select
ActiveSheet.PageSetup.PrintArea = Selection.Address
ActiveSheet.PageSetup.Orientation = xlPortrait
ActiveSheet.PrintOut
End Sub
このあとに,横長で$T$2から$AX$32を絶対番地で印刷し,
かつ両面印刷にしたいのですが,うまくいきません。
縦長と横長の混在はできないのでしょうか。
それとも,印刷範囲が離れているのがいけないのでしょうか。
もしかして,相対指定と絶対指定の混在がいけないのでしょうか・・・。
No.2ベストアンサー
- 回答日時:
>>シート1・2を「作業グループにして」一度に印刷する
>と言うのがよく分からないのですが,
マクロ以前の、エクセルの基本的な操作です。
参考:任意の複数のシートを選んで同時に印刷する
http://www.atmarkit.co.jp/fwin2k/win2ktips/849pr …
「新しいマクロの記録」で「シート1,2を作業グループにして印刷する」というのを録ってみると
Sub Macro1()
'
' Macro1 Macro
'
'
Sheets(Array("Sheet1", "Sheet2")).Select
Sheets("Sheet1").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End Sub
みたいな具合でいいと判りますので、実際に手を動かしてやってみてください。
No.1
- 回答日時:
両面印刷で出すには、「1回の印刷で」出力しなければ出来ません。
まず。1枚のシートの中で縦横の混在させるには、ご相談でやられているとおり用紙縦でまず1枚印刷、その後印刷の向きを横に変えて次を印刷と、「2回に分けて」印刷するしか手がありません。
結果してこれでは、両面印刷は出来ないというのが結論です。
じゃぁどうやったら出来るのか、手立てとしては。
シート1を用紙縦の設定にしておいてまず1枚目を作成
シート2を用紙横の設定にしておいて2枚目を作成
シート1・2を「作業グループにして」一度に印刷する
ことで、出来ます。
マクロ自体は「新しいマクロの記録」で簡単に入手できるので、作成してください。
ただし条件としては
1)ご利用のパソコンのウィンドウズの標準のプリンタを、エクセルを起動する前にプリンタのプロパティで両面印刷にして置く事
2)ご利用のプリンタが、縦横混在の連続印刷を上手に両面印刷で受ける性能を持っている事
などがあります。
どうも,ありがとうございます。
横長についても,マクロ記録を取りました。
>シート1・2を「作業グループにして」一度に印刷する
と言うのがよく分からないのですが,
2つのマクロを1つにしてしまうと言うことでしょうか?
これは質問する前にやってみたのですが,2枚目しか印刷されませんでした・・・。
プリンタについては,職場のプリンタ(かなり高級品)を使っていますので,
たぶん大丈夫ではないかと安易に考えています。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 【マクロ】webアドレスにて指定されたCSVファイル【excelソフト表示】を印刷する件 1 2023/02/15 01:52
- Excel(エクセル) エクセルのマクロで複数シートを両面印刷するには? 2 2022/12/08 23:23
- Excel(エクセル) 【マクロ】プリントスクリーンした画像をエクセルに貼付して印刷したい 6 2022/11/30 20:11
- Excel(エクセル) エクセル2013「次のページ数に合わせて印刷」が小さすぎる 9 2023/03/28 10:18
- Excel(エクセル) エクセルの印刷マクロについて質問があります。 現在、下記のマクロで印刷しています。Sheet1のD6 5 2023/06/12 10:59
- プリンタ・スキャナー プリンタ買おうと思ってます。キヤノンCanonがいいと思ってます。今まで使っていて十分機能満たしてい 6 2022/08/01 15:48
- その他(Microsoft Office) Excelのマクロについて教えてください。 1 2022/03/25 10:03
- Excel(エクセル) 【マクロ】スクショ印刷がうまく動かない件 5 2022/12/06 17:37
- Visual Basic(VBA) Accessフォームで全レコードを指定のExcelのセルへ転送し印刷する方法について 2 2022/09/08 18:23
- ノートパソコン ページ番号の入れ方について 3 2023/02/16 17:11
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【スプレドシート】IMPORTRANGE...
-
マイクロソフト 一時使用コード...
-
会社PCのメールが更新されない
-
英数字のみ全角から半角に変換
-
【Microsoft Forms】回答を削除...
-
VLOOKUP関数について
-
Microsoft Formsの「個人情報や...
-
【スプレッドシート】指定の日...
-
outlookのメールが固まってしま...
-
vb.net オブジェクト指向につい...
-
Outlook で宛先が複数の場合の人数
-
【スプレッドシート】白色のセ...
-
1つのPCに「Excel 2010」「Exc...
-
エクセルでXLOOKUP関数...
-
Microsoft Formsで「応答」から...
-
Office 2021 Professional Plus...
-
エクセルのシフト表を簡単にGoo...
-
Microsoft Edgeの「ニュースと...
-
Microsoft Officeに似たキング...
-
Excel VBA 日程表からスケジュ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【スプレドシート】IMPORTRANGE...
-
マイクロソフト 一時使用コード...
-
英数字のみ全角から半角に変換
-
Office2021を別のPCにインスト...
-
Microsoft Formsの「個人情報や...
-
officeビジネス型のワードやエ...
-
会社PCのメールが更新されない
-
【スプレッドシート】指定の日...
-
Microsoft Officeを2台目のPCに...
-
何このステータスバー
-
2つのシートの一致する行のセ...
-
会社のTeamsのことで相談です。...
-
エクセルにリンクされるのをし...
-
Windows 11で、IME言語バー(IM...
-
office2010とoffice365の共存で...
-
Microsoftのパソコンです。 エ...
-
エクセルでXLOOKUP関数...
-
Excel関数について質問ですm(__)m
-
VBA
-
自分の専門分野の仕事。初見で...
おすすめ情報