Macro activated by pwd

Hello,

My worksheet is already protected with the pwd: "passw0rd123". I have the below macro that I would be able to run (only users who know the pwd).

So I would really be interest in having a pop up asking me for the password in the below macro. Would that be even possible?

Sub SAVE()
ActiveWorkbook.SaveAs Filename:="C:\Folder\Folder(sample)_" & Format(Now(), "dd_mm_yyyy") & ".xlsm", _
        FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False

End Sub

Thanks,
Graig