Excelの印刷ボタンのVBAコード(5例)

  • これを共有
Hugh West

Excelのワークシートに印刷ボタンを設定すれば、シートの印刷にかかる時間を短縮でき、とても便利です。 VBAマクロ そこで今回は、簡単に使えるマクロを5つご紹介します。 ブイビーエー Excelの印刷ボタンのコード

練習用ワークブックをダウンロードする

ここから無料のExcelテンプレートをダウンロードし、ご自身で練習してみてください。

印刷ボタンを作成するVBAコード.xlsm

Excelの印刷ボタンにVBAコードを使用する5つの例

まず、このデータセットを紹介しましょう。 販売員の 売上高 地域 .

1.Excelの印刷ダイアログボックスに印刷ボタンを作成するVBAコードを使用する

まずは プリントボタン そのためのコードを書いていきます。

ステップス

  • クリック を以下のとおりとします。 デベロッパー >> インサート >> ボタンボックス。

その後すぐに プラス記号 あなたの中の カーソル .

  • ドラッグ その カーソル を選択することができます。 ボタンサイズ となり、しばらくすると ダイアログボックス 名前付き マクロを割り当てる が開きます。

  • を与える。 名前 プレスリリース .

A ブイビーエー のウィンドウが表示されます。

  • そして、次のコードを入力します。
 Sub DialogBox() Application.Dialogs(xlDialogPrint).Show End Sub 
  • 現在 もどる をあなたの シート .

コードブレークダウン

  • ここで、私が作成した サブ の手順で行います。 ダイアログボックス .
  • その後、使用 ダイアログ (xlDialogPrint).Showを表示します。 を開いてください。 印刷ダイアログボックス .

ボタンが作成されます。

  • 右クリック について ボタン を選択し テキストを編集する から コンテキストメニュー をクリックして、ボタン名を変更します。

  • その後、ちょうど タイプ その 名前 クリック マウス 何処でも ボタン以外 .

そして、そのまま ボタン .

そうすると 印刷ダイアログボックス もし、あなたが望むなら プリント 今すぐ

がない場合は プリンター 今この瞬間に 保存 と言うより PDF .再利用または プリント のちに

  • を押してください。 よっしゃー .

  • この時、ちょうど 名前 を押してください。 保存 .

以下は、プリントされたものです。 PDF .

続きを読む エクセルで印刷設定を調整する方法(8つの適切なトリック)

2.VBAコードでアクティブシートの印刷ボタンを作成する

ここでは ブイビーエー まで 活字体 アン アクティブ シート .

ステップス

  • をフォローしてください。 一段目からツーステップ を作成します。 ボタン マクロの割り当て .
  • を書く。 マクロ名 を押してください。 新規 .

その直後 ブイビーエー のウィンドウが表示されます。

  • その後 書く 以下 コード それじゃ
 Sub ActiveSheet() ActiveSheet.PrintOut End Sub 
  • 後日談です。 もどる になります。

コードの内訳

  • ここで、私が作成した サブ の手順で行います。 アクティブシート .
  • その後、使用 プリントアウト まで 選ぶ その アクティブシート 活字体 それを
  • 今だけ プレス その ボタン .

A ダイアログボックス 名前付き 印刷出力の名前を付けて保存 が開きます。

  • を与える。 名前 を押してください。 セーブ .

そうすると、印刷された PDF .

を簡単に変更することができます。 プリンター 必要であれば

  • クリック において ファイル の横にある。 ホーム

  • 次に、以下を選択します。 プリント オプションと クリック について ドロップダウン を選択してください。 プリンター .

続きを読む Excelで全シートを印刷する方法(3つの方法)

3.Excelで選択されたシートの印刷ボタンを作成するVBAコードを適用する

を希望する場合 プリント 具体的 選書 を使用することも可能です。 ブイビーエー .

ステップス

  • をフォローしてください。 一段目からツーステップ を作成します。 ボタン 割り当てる a マクロ .
  • を書きましょう。 マクロ名 を押してください。 新規 .

その直後 ブイビーエー のウィンドウが表示されます。

  • 後日談です。 タイプ 以下 コード それじゃ
 Sub SelectedSheets() ActiveWindow.SelectedSheets.PrintOut End Sub 

その後 もどる をあなたの シート .

コードブレークダウン

  • ここで、私が作成した サブ の手順で行います。 選択されたシート .
  • その後、使用 アクティブウィンドウ まで セレクトシート から アクティブ エクセル ウィンドウ .
  • 次に、使用した プリントアウト 印刷する 複数 せんたんてき シーツ .
  • 現在 シートを選ぶ を押してください。 プリントボタン .2枚を選択しました。

  • を与える。 名前 に対して PDF を押してください。 セーブ .

があります。 PDF ファイルには ヲ・ページ に対して 二枚 .

続きを読む ExcelのVBAマクロを使用して特定のシートを印刷する方法(4つの方法)

類似の読み物。

  • ExcelシートをA4サイズに印刷する方法(4つの方法)
  • 印刷時にExcelのヘッダーを保持する方法(3つの方法)
  • Excel VBA:印刷領域を動的に設定する方法(7つの方法)
  • Excelのシートを線引きして印刷する方法(3つの簡単な方法)
  • エクセルでグラフを印刷する方法(5つの方法)

4.選択された範囲を持つ特定のシートの印刷ボタンを作成するExcel VBAを埋め込む

ここでは プリントボタン まで 活字体 a 選択範囲 から とくしゅシート .

ステップス

  • をフォローしてください。 一段目からツーステップ を作成します。 ボタン とマクロを割り当てる。
  • を書く。 マクロ名 を押してください。 新規 .

その直後 ブイビーエー のウィンドウが表示されます。

  • その後 書く 以下 コード -
 Sub SpecificSheetnRange() With Sheets("SpecificSheet+Range") .PageSetup.PrintArea = "B2:D11" .PrintOut End With End Sub 
  • 後で、自分のシートに戻ってください。

コードブレークダウン

  • ここで、私が作成した サブ の手順で行います。 SpecificSheetnRange .
  • その後、使用 もうしこみ 選ぶ a 具体的
  • 次のページ PrintArea = "B2:D11".PrintOut 意志 選ぶ その レンジ から とくしゅシート となり プリント それを
  • 今だけ プレス その プリントボタン .

  • を設定します。 名前 に対して PDF を押してください。 保存 .

のことです。 所載 の具体的なシートです。

続きを読む Excel VBA:複数の範囲に印刷領域を設定する(5例)

5.選択した範囲を含むアクティブシートの印刷ボタンを作成するExcel VBAを埋め込む

また 範囲を選択する から アクティブシート を作ることができます。 プリントボタン まで 活字体 以て ブイビーエー .

ステップス

  • をフォローしてください。 一段目からツーステップ を作成します。 ボタン を割り当てて マクロ .
  • を後で書きます。 マクロ名 を押してください。 新規 .

その直後 ブイビーエー のウィンドウが表示されます。

  • での ブイビーエー ウィンドウに表示されます。 書く 以下 コード -
 Sub ActiveSheetnRange() Range("B2:D11").PrintOut End Sub 
  • その後 もどる をあなたの シート .

コードブレークダウン

  • ここで、私が作成した サブ の手順で行います。 アクティブシートンレンジ .
  • その後、使用 レンジ("B2:D11").PrintOut まで 選ぶ a レンジ を印刷します。
  • を押してください。 プリントボタン .

  • を与える。 名前 を押してください。 セーブ .

そうすると 印字範囲 .

続きを読む 特定のシートを印刷するExcelボタン(簡単な手順付き)

結論

上記のような手順で、VBAのコードで十分だと思いますが プリントボタン ご質問やご意見がありましたら、コメント欄にてお願いします。

Hugh West は、業界で 10 年以上の経験を持つ、非常に経験豊富な Excel トレーナー兼アナリストです。彼は会計と財務の学士号と経営管理の修士号を取得しています。ヒューは教えることに情熱を持っており、理解しやすい独自の教育アプローチを開発しました。彼の Excel に関する専門知識は、世界中の何千人もの学生や専門家がスキルを向上させ、キャリアで優れた成果を上げるのに役立ってきました。 Hugh はブログを通じて知識を世界に共有し、個人や企業が潜在能力を最大限に発揮できるよう無料の Excel チュートリアルとオンライン トレーニングを提供しています。