【VBA】For Each文において特定条件で処理をスキップする方法

Question

Set f = fso.GetFolder(path)
For Each file In f.Files
 if file.Name = "AAA.txt" Then
  '★★★
 End If
 '処理A
Next

フォルダ(path)には複数のファイルが存在し、
ファイル名が「AAA.txt」だった場合は「処理A」をスキップするという処理を書く方法はありますか？

javaでいうところのcontinueを★★★に挿入したいです。

Answer 1

GOTOをForEachの末尾に挿入

★★★をGoTo XXXに修正

追記　

if file.Name = "AAA.txt" Then
  '★★★
else
 '処理A
end if

Comments

[sazi]

gotoは最後の手段です。
if elseにすれば良さそうに見えますけど。

[hyubyu-n1]

確かにそうですね・・・。
if-elseが何故か頭からすっぽりと抜けていました。