セルで入力した値を部数印刷

マクロ / VBA

セルに入力した数字分だけを部数印刷してみます。
簡単なマクロですがやってみましょう。(初マクロカテゴリなので簡単なところから・・・)
10-1.jpg

もうそのまんまです。
セルB1【Cells(1,2)】の値を変数【maisuu】に代入させ、
セルB2【Cells(2,2)】の値を変数【sheet_name】に代入させています。
あとはFor文で部数分印刷を繰り返してやれば完了です。
おまけ
指定したセルだけを印刷したい場合は

A1からF35を範囲選択し、そこのみを印刷します。

Comment

  1. ひろ より:

    私のしようとしていることに非常に近く、大変参考になっております。ありがとうございます。
    「セルで入力した値を部数印刷」ですが、私はたくさんのシートを部数印刷したいと思っておりまして、sheet3の隣にsheet4,sheet5…とした時にマクロにはどの場所にどのように入力すれば部数印刷動作するのでしょうか?
    マクロ初心者でして大変申し訳ありませんがよろしくお願いいたします。

コメントをどうぞ

メールアドレスが公開されることはありません。

  • ▼お小遣い稼ぎしませんか?▼ 日々の生活にhappyをプラスする|ハピタス

    クレジットカード・FX口座を作るだけで簡単に3万円GETです。一切支出はありません。

DATE VLOOKUP 検索 MATCH グラフ 作業効率UP バーコード クイズ COLUMN 条件付き書式 無料 印刷 ワイルドカード テンプレート ユーザー定義関数 コピペ INDEX XLSTART HLOOKUP SUMIF 日付 COUNTIF NA() フロー図 STDEV TODAY 図形 目標 偏差値 SUM
  • 関西在住の30代サラリーマン。事務職で毎日Excelと戯れています。
    システム導入なんて資金が無い!Excelでなんとかやりたい零細中小の社長さん・事務員さんの力になればと思います。
    詳しいプロフィール


PAGE TOP ↑