VBA Saving File Name

[Pinaceous]

Good Day All,

I have a *.xlsm file that is saved as title "ddmmmyyyy ExcelFile.xlsm".

Sometimes in using slower computers in using this file its name gets edited without the user consent when it is saved.

How would I prevent the excel file from saving itself as a different name as titled above?

For example, if I have;

"29APR2023 ExcelFile.xlsm" How would I prevent it from it being saved as "29APR2023 ExcelFile-ComputerName .xlsm" or anything other then "29APR2023 ExcelFile.xlsm"?

Is there a sub that someone has that they can share on this topic?

Please let me know.

Many thanks in advance!

Respectfully,
pinaceous

 

[Herakles]

Put this code in the Workbook Code Module.

It seems to prevent the user saving the file under a different name by disabling the options on
the Save As dialog screen.

Remember to password protect your VBA code as users could change or delete this sub.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

    If SaveAsUI = True Then
        Cancel = True
    End If

End Sub

 

[Pinaceous]

seems to prevent the user saving the file under a different name by disabling the options on
the Save As dialog screen.

Herakles,​

Interesting. Very interesting.

I do appreciate this code!

But I believe that the computer is acting independently from the user for "this" purpose.

I'll have to run this sub upon one of my files to see if it will happen again because I do not think that the user is allowing the name change.

If any changes to the sub as per my description, please let me know!

Thanks again!

Respectfully,
pinaceous