Ok my fault It was the file path I had to change. But it will only open the first workbook not the rest. It gives me this line error.

[VBA]
FileName = Dir()
[/VBA]

Run-time error '5':
Invalid Procedure call or argument