Count Files in Folder. [RESOLVED]

[Sir Loin]

How do I count the files in a folder?

Thanks,
Sir Loin

[Hack]

Here you go.

[RhinoBull]

The easy way is to use FileSystemObject (scripting library):

Private Sub Command1_Click()
'===============================
Dim fso As New FileSystemObject
Dim fldr As Folder
 
    Set fldr = fso.GetFolder("c:\windows")
    MsgBox "Total files in the folder: " & fldr.Files.Count
 
End Sub

The better way is to use Windows API but this also means much more coding.

[Sir Loin]

Nice, thank you!