ここではコマンドボタンをクリックすると、印刷プレビューが表示されるようにします。
リボンの[開発]-コントロールグループの[挿入]-ActiveXコントロールの[コマンドボタン]をクリックします。
- シート上をドラッグし、コマンドボタンを配置します。
- リボンの[プロパティ]をクリックします。
- プロパティウィンドウの[Caption]に「印刷」と入力します。
- コマンドボタンをダブルクリックします。
Private Sub CommandButton1_Click()
End Sub
と表示されるので、空白の行の間に
Worksheets("Sheet1").PrintPreview
と入力します。
- リボンの[デザインモード]をクリックすると、コマンドボタンは非選択の状態になります。
- 印刷ボタンをクリックします。
このようにコマンドボタンに機能を設定することで、作業が簡単になり、ミスも防止できます。
![ActiveXコントロールの[コマンドボタン]をクリック](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhKKa1SDZxEofZ3RBwgb41Yr3mHTj1OzfL5a73I5jxMXbLVemzH-EWAzlINfpNcLIQSiEVAoiw0ebz6uMJHiY5-Qe2a4DWQF4kRbDo0JQst2q5h2ZhCvzMF62cnihU7Rv8-GKBl3NTBx1c/s1600/image330-1.gif)
![リボンの[プロパティ]をクリック](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhTGVsegV9NpX32lYmVrKledGYaLhKXSsB-AVIda8L0gUDUp-u1Z7pAYnIm7tSDH4iGwQHgTFXGRF0N7fxJ8lydY58hBzjFYCPMmP7j4282v9mv994Vli99xNooiO6vyRQ7IjvRfcLckTk/s1600/image330-2.gif)


