View Single Post
  #6   Report Post  
Don Guillett
 
Posts: n/a
Default

this should do it. I do NOT recommend saying as 97/95. Just save as an excel
file.

Sub SaveAsCellString()
Range("A16:C28,e8").ClearContents
ActiveWorkbook.SaveAs Filename:= _
"C:\shipway\invoices\" & Range("E5")
End Sub


--
Don Guillett
SalesAid Software

"lunker55" wrote in message
...
I have two macros. I would like to press 1 macro button that will do both
macros.
Is there a way to do this?
Macros are below,
Joe

Sub SaveAsCellString()
ActiveWorkbook.SaveAs Filename:= _
"C:\shipway\invoices\" & Range("E5").Formula,
FileFormat:=xlExcel9795, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub



Sub clearform()
'
' clearform Macro
' Macro recorded 20/06/2005 by Joe Clarkson
'

'
Range("A16:C28").Select
Selection.ClearContents
Range("E8").Select
Selection.ClearContents
End Sub