ページ

2014年6月20日金曜日

コマンドボタンを使ってみる

Excel2013のコマンドボタンを使ってみます。
ここではコマンドボタンをクリックすると、印刷プレビューが表示されるようにします。

リボンの[開発]-コントロールグループの[挿入]-ActiveXコントロールの[コマンドボタン]をクリックします。
ActiveXコントロールの[コマンドボタン]をクリック
  1. シート上をドラッグし、コマンドボタンを配置します。
  2. リボンの[プロパティ]をクリックします。
  3. プロパティウィンドウの[Caption]に「印刷」と入力します。
  4. コマンドボタンをダブルクリックします。
リボンの[プロパティ]をクリック
VBAの入力画面になります。
Private Sub CommandButton1_Click()

End Sub
と表示されるので、空白の行の間に
Worksheets("Sheet1").PrintPreview
と入力します。
VBAの入力画面
  1. リボンの[デザインモード]をクリックすると、コマンドボタンは非選択の状態になります。
  2. 印刷ボタンをクリックします。
印刷ボタンをクリック
印刷プレビュー画面になります。
印刷プレビュー画面
このようにコマンドボタンに機能を設定することで、作業が簡単になり、ミスも防止できます。