Microsoft Excel VBA - 全てのワークシートを印刷する方法

◆概要

このページは、Excel VBAで全てのワークシートを印刷する方法について記載しています。

ブックの中のすべてのワークシートを印刷するには次のようにします。

◆Sample A
For Each ～Nextをつかう方法

Sub PrintAllWs1()

    Dim myWS As Worksheet

    For Each myWS In Worksheets
        myWS.PrintOut
    Next myWS

End Sub

◆Sample B
Worksheet オブジェクトを使う方法です。Worksheet オブジェクトは Worksheets コレクションのメンバーです。Worksheets コレクションには、ブックにあるすべての Worksheet オブジェクトが含まれています。

Sub PrintAllWs2()

       Worksheets.PrintOut

End Sub

◆Sample C
ActiveWorkbook プロパティを使う方法

Sub PrintAllWs3()

       ActiveWorkbook.PrintOut

End Sub

White Tiger