エクセルから帳票形式に差込印刷したいのですが

＃０１です。出血大サービスです(^^; ただし不具合以外の修正はご自身でお願いします。 ２行目～４行目と項目の定義の箇所は再度設定し直してください。 Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) Sub InsPrint() Const org As String = "Sheet1" '元データのシート名 Const prs As String = "Sheet2" '印刷するシート名 Const strt As Integer = 2 '元データの実データ開始行 Dim idx, fromL, toL As Long Dim oSht, pSht As Worksheet Dim res, res2 Set oSht = Worksheets(org) Set pSht = Worksheets(prs)

[windish]

Excel VBA よくわからん|サンプル公開した人は2ch風にいうと神

[julajp]

うひゃもの凄い的確かつ配慮が利いている。sleep はhttp://homepage1.nifty.com/MADIA/vb/API/Sleep.htm こんな事なのか。

[hatayasan]

Excelで差し込み印刷。丁寧なマクロの解説がある。