Hi Varun,

The suggested code works for me without problem.

I assumed that your wav files had a .Wav extension. If the the extension is
different (or non-existant), then you will need accordingly to replace the
expression: & "*.Wav" in the line

FName = Dir(MyPath & "*.Wav")


---
Regards,
Norman