教えて!ExcelVBA!

ExcelVBAの基礎知識・書き方について説明していきます。

【ExcelVBA 印刷】シートを印刷(PrintOut)するにはどうすればいいの?教えて!

       f:id:m_kbou:20200419132754p:plain

シートの印刷方法について説明します。Excelを使用していると印刷するケースは多々あります。是非覚えておいて下さい。

 

【目次】

 

構文

記述方法は、以下の通りとなります。

=======================================================================

Activesheet.PrintOut

Sheets("[シート名]").PrintOut

=======================================================================

[説明]:

現在アクティブになっているシートを印刷する場合は「Activesheet.PrintOut」と記述し、特定のシートを指定して印刷する場合は「Sheets("[シート名]").PrintOut」と記述します。特定シートの印刷時の[シート名]には印刷したいシート名を記述し、「”」(ダブルクォーテーション)で囲みます。印刷するにはPrintOutメソッドを使用します。内容を纏めると、「アクティブシート又は指定したシートを印刷して下さい。」との意味になります。

[記述例]:

ActiveSheet.PrintOut
Sheets("Sheet3").PrintOut

 

使い方

使い方について、具体的に説明していきます。

現在アクティブになっているシートを印刷する方法 

アクティブシートを印刷する方法について説明します。

[記述例]:

※以下の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方については、VBEの開き方を参考にして下さい。

-------------------------------------------------

Sub サンプル()
    ActiveSheet.PrintOut
End Sub

-------------------------------------------------

内容は、「現在アクティブになっているシートを印刷して下さい。」との意味になります。

[実行例]:

(実行前)

※sheet1シートに写真が貼り付けてあり、sheet1シートがアクティブになっている。

f:id:m_kbou:20191216100432p:plain

(実行後)

※Sheet1シートが印刷された。

f:id:m_kbou:20191216100446p:plain

アクティブシートを印刷する方法についての説明は以上です。

 

指定したシートを印刷する方法 

指定したシートを印刷する方法について説明します。

[記述例]:

※以下の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方については、VBEの開き方を参考にして下さい。

-------------------------------------------------

Sub サンプル()
    Sheets("Sheet3").PrintOut
End Sub

-------------------------------------------------

内容は、「Sheet3シートを印刷して下さい。」との意味になります。

[実行例]:

(実行前)

※sheet3とsheet1シートに各々写真が貼り付けてあり、sheet1シートがアクティブになっている。

f:id:m_kbou:20191216100509p:plain

f:id:m_kbou:20191216100432p:plain

(実行後)

※Sheet3シートが印刷された。

f:id:m_kbou:20191216100521p:plain

指定したシートを印刷する方法についての説明は以上です。

 

おわりに

今回はシートを印刷する方法について説明しました。類似した内容にページを指定して印刷する方法や印刷枚数を指定する方法があります。また、印刷プレビューで確認する方法もあります。一緒に覚えてもらえると印刷方法のバリエーションが広がります。