Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


1053 / 13644 ツリー ←次へ | 前へ→

【76578】Sheet1のデータを1行ごとに印刷する方法 oak 15/1/19(月) 15:52 質問[未読]
【76579】Re:Sheet1のデータを1行ごとに印刷する方法 独覚 15/1/19(月) 16:10 発言[未読]
【76580】Re:Sheet1のデータを1行ごとに印刷する方法 oak 15/1/19(月) 17:31 発言[未読]
【76584】Re:Sheet1のデータを1行ごとに印刷する方法 oak 15/1/20(火) 13:35 お礼[未読]

【76578】Sheet1のデータを1行ごとに印刷する方法
質問  oak  - 15/1/19(月) 15:52 -

引用なし
パスワード
   お世話になっております。
大変初心者の質問で恐縮なのですが、Sheet1に作った表を1行ずつ印刷していきたいと考えています。

Excel2010使用で、Sheet1のA列に品番、B列に品名、C列に色名を入力してあるデータで、行は500行ほどあります。
この表を各行ごとに倉庫の看板として印刷することになったため、一気に印刷できる方法がないかと思い、マクロを作ってみましたがうまく動きません。
コードをご教示いただけないでしょうか?

表はSheet1に以下のように作ってあります

Sheet1
   A    B   C
1 品番  品名  色名
2 3501  リュック  クロ
3 3502  ナップ  ピンク
4 3503  リュック  アカ

このようなデータが500行あります。
この表を、例えば以下のような看板として1枚ずつ印刷したいです。

  A
1 3501
2 リュック
3 クロ

これを500行分連続して行うコードはどのようにしたらよいでしょうか?
恐れ入りますが、どなたかご教示いただければ幸いです。
よろしくお願いいたします。

【76579】Re:Sheet1のデータを1行ごとに印刷する方...
発言  独覚  - 15/1/19(月) 16:10 -

引用なし
パスワード
   ▼oak さん:
ワードを使って差し込み印刷を行ったらどうかな?

【76580】Re:Sheet1のデータを1行ごとに印刷する方...
発言  oak  - 15/1/19(月) 17:31 -

引用なし
パスワード
   ▼独覚 様
>ワードを使って差し込み印刷を行ったらどうかな?

なるほど、マクロにばかりに頭が行って差し込み印刷を考え付きませんでした。
早速やってみます。ありがとうございます。

もし無理なようでしたらまた質問させていただきます。

【76584】Re:Sheet1のデータを1行ごとに印刷する方...
お礼  oak  - 15/1/20(火) 13:35 -

引用なし
パスワード
   ▼独覚 様
差し込み印刷で無事データを印刷できました。
マクロにばかり気が行って、差し込み印刷に気付かなかったのはお恥ずかしい限りです。
ご助言ありがとうございました。

1053 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free