質問: excelからexcelへの差し込み印刷 お世話になります。 excelでwordへの差し込み印刷をよく利用するのですが、 同様に、 excelのデータをexcelに流し込んで印刷する方法はありますでしょうか。 excelの名簿のデータを excelの表のフォーマットに流し込んで 1人づつ印刷したいのですが。 お分かりの方いらっしゃいました教えてください。 どうぞ宜しくお願い致します。
回答: vlookup関数,hlook関数,match関数,index関数,indirect関数等を用いれば 1人ずつ印刷は可能です。 ただ連続印刷したい場合は、レコード番号をvbaで変化させる必要があります。 例 sheet1にデータを作成a2:d100の範囲 a b c d no. 氏名 郵便番号 住所 1 aaa 100-0001 東京都千代田区千代田 2 bbb 103-0001 東京都中央区日本橋小伝馬町 ・ ・ sheet2に印刷用フォームを作成 a1にno.を入力するように設定、b1:z20を印刷範囲に設定 郵便番号 c5=vlookup($a$1,sheet1!$a$2:$d$100,2,false) 住__所 c7=vlookup($a$1,sheet1!$a$2:$d$100,3,false) 氏__名 d9=vlookup($a$1,sheet1!$a$2:$d$100,4,false) マクロの例 sub sahikomi() sno = inputbox("開始no.を入力") eno = inputbox("終了no.を入力") for i = sno to eno worksheets("sheet2").range("a1") = i activewindow.selectedsheets.printout copies:=1, collate:=true next i end sub