回答編集履歴
2
誤字の修正
test
CHANGED
|
@@ -26,4 +26,6 @@
|
|
|
26
26
|
|
|
27
27
|
```
|
|
28
28
|
|
|
29
|
+
|
|
30
|
+
|
|
29
31
|
2重ループ不要でradames1000さんのソースで動くと思います。
|
1
修正と追記
test
CHANGED
|
@@ -1,4 +1,4 @@
|
|
|
1
|
-
|
|
1
|
+
2重For文の順番をよく確認してください。
|
|
2
2
|
|
|
3
3
|
以下のように処理が動いてしまっています。
|
|
4
4
|
|
|
@@ -25,3 +25,5 @@
|
|
|
25
25
|
Cells(4 + h, 5 + 13).Value = UserForm2.Controls("TextBox" & 7).Value
|
|
26
26
|
|
|
27
27
|
```
|
|
28
|
+
|
|
29
|
+
2重ループ不要でradames1000さんのソースで動くと思います。
|