Create buttom that saves current file in a given filename (Excel)

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

mamealemka - 17 Mar 2006 08:52 GMT

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.

Reply to this Message

Thunder - 17 Mar 2006 09:24 GMT

>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

Reply to this Message

mamealemka - 17 Mar 2006 10:46 GMT

Hi Thunder

Thanks.

> >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
[quoted text clipped - 18 lines]
>
> Thunder

Reply to this Message

Thunder - 17 Mar 2006 13:02 GMT

> Hi Thunder
>
> Thanks.

Hi mamealemka,

You're Welcome, De Nada, De Rien, Di Nulla, ????????, ????, ?? ???????

;-)

tHUNDER

Reply to this Message