Create buttom that saves current file in a given filename (Exc
Hi Thunder
Thanks.
"Thunder" wrote:
"mamealemka" ha scritto nel messaggio
...
I want the user to save a protected worksheet by clicking on an action
buttom. The file should be saved with another file name taken from a cell
in
the worksheet.
Hi,
try the following code:
Private Sub CommandButton1_Click()
Const MyPath = "C:\"
With ThisWorkbook
.SaveAs Filename:=MyPath & Cells(1, 2).Value & ".xls" '<===Cell B1 =
Change
End With
End Sub
This code does not make a control on the path of your folder.
Thunder
|