Custom Save Button
 

Application.Dialogs(xlDialogSaveAs).Show _
arg1:="Customer1"
ActiveWorkbook.Worksheets("sheet1").Range("a1").Va lue & ".xls"


- manges

--
Message posted from http://www.ExcelForum.com

Custom Save Button
 

Hi thanks for the advice but it won't work!
It says Compile error, syntax error
All I have done is associate the new details with my existing macro?
What am I doing wrong??

"mangesh_yadav " wrote:

Application.Dialogs(xlDialogSaveAs).Show _
arg1:="Customer1" &
ActiveWorkbook.Worksheets("sheet1").Range("a1").Va lue & ".xls"


- mangesh


---
Message posted from http://www.ExcelForum.com/

Custom Save Button
 

Difficult to imagine why you are getting the error. what else do yo
have in the code.

- Manges

--
Message posted from http://www.ExcelForum.com

Custom Save Button
 

Try this:

Dim sName as String
sName = Customer1" & format( _
ActiveWorkbook.Worksheets("sheet1") _
.Range("a1").Value,"ddmmyy") & ".xls"

Application.Dialogs(xlDialogSaveAs).Show sName

--
Regards,
Tom Ogilvy


"MDL2004" wrote in message
...
I copied the entire code as you wrote into a macro under the name of
button
3.it still says error but if i remove the Arg1:= "Customer1" & it works
but
without inserting the customer 1 bit

Do I have to set Arg1 up as a label of customer 1?? or will this equation
simply just do what i'm trying to do. I'm new to VB and need all the help
i
can get!!

"mangesh_yadav " wrote:

Difficult to imagine why you are getting the error. what else do you
have in the code.

- Mangesh


---
Message posted from http://www.ExcelForum.com/