GetSaveAsFilename - change file type, runtime error 1004

Hello,

I have a workbook that I'm trying to suggest a filename for when the user selects Save As. That's all I wanted to achieve but it's getting increasing complicated and now I have a runtime error I can't seem to find a way around.

I want to allow the user the ability to select a .xlsx file type if they wish, which all works fine until it hits ThisWorkbook.SaveAs when I get a runtime 1004 error:

Please Login or Register  to view this content.

Originally I didn't have the FileFormat specified and it gave me a runtime 1004 error with text stating that it couldn't be saved as this file type.

sFullName contains: \\...\Profile\Desktop\SaveAs TestMacro\2017-10-10RMSelfTestResultsSR.xlsx ("..." are to shorten the string for visibility in this posting, the full file path is actually correct)
sExt contains: .xlsx

The code works fine if saving as an .xlsm file.

Anyone have any ideas what's wrong with this - or an alternative method of pre-populating the Save As filename?

Any assistance appreciated

Thanks, TC

Ah, I see. That simple!

I've modified the code again, but it just feels really clunky - it works fine. I've adapted someone else code to start with so perhaps that's why it doesn't quite feel right. The structure feels more unwieldy that it need be:

Please Login or Register  to view this content.

Am I missing something, or worrying about nothing?

Marking post as solved because my initial problem has been - but would still appreciate any input regarding streamlining structure.