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

マクロ / VBA

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

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

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

Comment

  1. ひろ より:

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

コメントをどうぞ

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

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


PAGE TOP ↑