Yes I see your point but exactly that is what's (in some cases) not working in the original.

strFileName = Dir$(strFPath & strSpec)

only had the name of the file as a result:

strFileName = example.pptx
StrFPath = C:\examplefolder\

This is why I combined those variables in the second step, which somehow only worked within the loop.

strFileName = strFPath & strSpec

It was just trial an error for me, since I do not really have programming knowledge and just common sense within my set of skills...