条件つきコピー 繰り返しコピー for next や for each in next do whileステートメントを使用することで 広範囲で何度もコピペを繰り返させることができます また if文 や 関数 などと組み合わせることで 条件を色々絞ることが可能です. ほかの貼り付け方の実装方法を知りたい場合はその都度 マクロ 貼り付け方 で検索すると良いですよ プログラミングは無駄に覚えることなく必要になったら調べるくらいの勉強をすることをお勧めします でないと頭がぱんぱんになっちゃって何も進みません では実行してみましょう. 1列目から始まって3列目まで同じ処理を繰り返していますので 列方向でもfor next文 で置き換えることができます dim i as long j as long k as long k 21 for i 2 to 4 for j 1 to 3 wstemplate cells k j value wsdata cells i j value next j k k 1 next i.