Excel (VBA)

Excel VBAに関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(指定なし : 指定なし)
差し込み印刷の連続印刷
投稿日時: 19/10/06 17:50:24
投稿者: ひろやまさん

質問です。
差し込み印刷の連続印刷をしたいのですが、
例えば、A列に
  
あああ
いいい
ううう
  
とあった場合に、
  
これを反映
別のシートで作られた・・・例えば、C1に「あああ」と参照させて、連続印刷する方法はございますか?
  
(説明がわかりにくくなってしまい、申し訳ありません。。。)
 
※一般の方で質問させてもらいましたが、VBAでないと難しいとご回答をしてもらったので、再度質問させてもらっています。
 
わかる方いらっしゃれば、回答お願いいたします。

回答
投稿日時: 19/10/06 18:52:57
投稿者: simple

こういうイメージですかね。
印刷範囲の設定とかはすでにできているものとして。
 

Sub test()
    Dim wsリスト As Worksheet
    Dim ws印刷 As Worksheet
    Dim k As Long
    
    Set wsリスト = Worksheets("Sheet1")
    Set ws印刷 = Worksheets("Sheet2")
    
    For k = 1 To 3
        ws印刷.Range("C1").Value = wsリスト.Cells(k, "A").Value
        ws印刷.PrintOut
    Next
End Sub

回答
投稿日時: 19/10/06 21:17:05
投稿者: simple

マクロを使うのは初めてということでしたら、
マクロの入門書をおよみいただいたほうが早いと思います。
言葉による説明より、画面の画像を交えた解説のほうが理解しやすいと思います。

投稿日時: 19/10/07 16:03:43
投稿者: ひろやまさん

ありがとうございます。今日はまだ使わないので、明日使ってみたいと思います。
アドバイスありがとうございます。初めてでは無いのですが、VBAはなかなか敷居が高くて・・・。。。明日また質問があれば、ここに投稿させてもらいます。

投稿日時: 19/10/08 14:08:32
投稿者: ひろやまさん

ありがとうございます。とりあえず、大丈夫です!ありがとうございました!!