回答編集履歴
3
文法の修正
answer
CHANGED
|
@@ -1,11 +1,12 @@
|
|
|
1
|
-
~~GOTOをForEachの末尾に挿入
|
|
1
|
+
~~GOTOをForEachの末尾に挿入~~
|
|
2
2
|
|
|
3
|
-
★★★をGoTo XXXに修正~~
|
|
3
|
+
~~★★★をGoTo XXXに修正~~
|
|
4
4
|
|
|
5
5
|
追記
|
|
6
|
-
|
|
6
|
+
```vba
|
|
7
7
|
if file.Name = "AAA.txt" Then
|
|
8
8
|
'★★★
|
|
9
9
|
else
|
|
10
10
|
'処理A
|
|
11
|
-
end if
|
|
11
|
+
end if
|
|
12
|
+
```
|
2
追記
answer
CHANGED
|
@@ -2,6 +2,7 @@
|
|
|
2
2
|
|
|
3
3
|
★★★をGoTo XXXに修正~~
|
|
4
4
|
|
|
5
|
+
追記
|
|
5
6
|
|
|
6
7
|
if file.Name = "AAA.txt" Then
|
|
7
8
|
'★★★
|
1
コメントを参考に解決内容を修正
answer
CHANGED
|
@@ -1,3 +1,10 @@
|
|
|
1
|
-
GOTOをForEachの末尾に挿入
|
|
1
|
+
~~GOTOをForEachの末尾に挿入
|
|
2
2
|
|
|
3
|
-
★★★をGoTo XXXに修正
|
|
3
|
+
★★★をGoTo XXXに修正~~
|
|
4
|
+
|
|
5
|
+
|
|
6
|
+
if file.Name = "AAA.txt" Then
|
|
7
|
+
'★★★
|
|
8
|
+
else
|
|
9
|
+
'処理A
|
|
10
|
+
end if
|