Excel VBA 質問スレ Part52

[588 デフォルトの名無しさん 2018/03/30(金) 23:34:41.59]

>>584
If 〜 Then N = N + 1 を複数行にして

If 〜 Then
If N = 0 Then strFirstFileName = ff.Name
N = N + 1
End If

にすればいい