どこかからデータをコピーしてこのマクロを使って添付するような使い方が想定されます。 下記の画像は連続でマクロを実行した結果です。 Sub 字を入れる()Dim topdata As StringRange("C1").Selecttopdata = Range("C1").Value If topdata = "" Then ActiveC…

B2の数値を参照してコピーする回数を指定し、 一枚目の画像から二枚目の画像のようになるマクロです それぞれのシートのロット、管理番号は１ずつカウントアップしてます シート全体を選択するのと印刷プレビューはおまけです そのまま印刷できそうですね 動…