質問編集履歴
1
オートフィルを使わずコピペでも大丈夫です。
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -13,7 +13,7 @@
|
|
|
13
13
|
Selection.AutoFill Destination:=Range("B" & row1 & ":G" & row2), Type:=xlFillCopy
|
|
14
14
|
|
|
15
15
|
|
|
16
|
-
B〜Gに顧客データ、Hに注文内容が入っていて、注文件数が
|
|
16
|
+
B〜Gに顧客データ、Hに注文内容が入っていて、注文件数がそれぞれ違うのです。
|
|
17
17
|
ちなみにデータは顧客ごとに1行空間を空けています。
|
|
18
18
|
|
|
19
19
|
↓こんな感じに入力していくのが理想です。
|
|
@@ -32,4 +32,6 @@
|
|
|
32
32
|
4|4|4〜4|4
|
|
33
33
|
（1顧客ごとに入力していくマクロです。）
|
|
34
34
|
|
|
35
|
+
オートフィルを使わずコピペでも大丈夫です。
|
|
36
|
+
|
|
35
37
|
素人質問で申し訳ないのですがご教授お願いいたします。
|