Vba, How can code the excel file to save as only and disable to save directly file

[mawar5530]

Hi Friends,

Please help to share vba macro code.

 

[ashakantasharma]

You can try this VBA Code :

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

If SaveAsUI Then

MsgBox "The 'Save As' function has been disabled." & _
Chr(10) & "For Review Purpose Only", vbInformation, "Save As Disabled"
Cancel = True

End If

End Sub

 

[mawar5530]

tq