完全なワークブックの用紙サイズの変更（Microsoft Excel）

ボブは、約15のワークシートを含むワークブックを持っており、すべてのワークシートのページ形式をレターからA4に変更する必要があります。次の手順に従って変更を加える簡単な方法があります：

。ワークシートタブを右クリックします。コンテキストメニューが表示されます。

。 [すべてのシートを選択]を選択します。これで、すべてのワークシートタブが選択されます。

。 [ファイル]メニューから[ページ設定]を選択します。 Excelに[ページ設定]ダイアログボックスが表示されます。

。 [ページ]タブが表示されていることを確認します。（図1を参照）

。 [用紙サイズ]ドロップダウンリストを使用して、[A4]を選択します。

。 [OK]をクリックします。

。ワークシートタブを右クリックします。コンテキストメニューが再び表示されます。

。 [シートのグループ化を解除]を選択します。

それでおしまい;これで、すべてのワークシートの用紙サイズが設定されました。ただし、このアプローチには欠点があります。個々のワークシートのページ設定設定が異なる場合（向き、余白、ヘッダー、フッターなどが異なる場合）、次の手順に従うとすべて同じに設定されます。

用紙サイズのみを変更し、他の設定を変更したくない場合は、マクロを使用して変更を行うしかありません。

Sub AllSheetsA4()

Dim sht As Variant

For Each sht In ActiveWorkbook.Sheets         sht.PageSetup.PaperSize = xlPaperA4     Next End Sub

マクロはブック内の各シートをステップスルーし、PaperSizeプロパティのみを変更して、シートがA4用紙に印刷されるようにします。

注：

このページ（または_ExcelTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント（2896）は、Microsoft Excel 97、2000、2002、および2003に適用されます。Excel（Excel 2007以降）のリボンインターフェイス用のこのヒントのバージョンは、次の場所にあります。