can anyone help!
I have a workbook with 3 worksheets, and 3 columns ie. A B & C on each worksheet. A is the current sum, B is the previous sum, and C is the newest sum. I want to use a macro to save the workbook and create a new one with all the 3 worksheet and 3 columns. A is the current sum, which is blank, B is the previous sum, which is the C in the old worksheet, and C is the newest sum, which is A + B.
I have the saveas macro: how would I do it upon clicking the macro??? Please Help ???
Sub New_Payment_Request()
Dim newname As String
newname = Range("c2"
.Text
ActiveWorkbook.SaveAs FileName:= _
"" & newname & ".xls", FileFormat:=xlNormal, _
password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
ActiveWorkbook.Close
Excel.Application.Quit
End Sub
I have a workbook with 3 worksheets, and 3 columns ie. A B & C on each worksheet. A is the current sum, B is the previous sum, and C is the newest sum. I want to use a macro to save the workbook and create a new one with all the 3 worksheet and 3 columns. A is the current sum, which is blank, B is the previous sum, which is the C in the old worksheet, and C is the newest sum, which is A + B.
I have the saveas macro: how would I do it upon clicking the macro??? Please Help ???
Sub New_Payment_Request()
Dim newname As String
newname = Range("c2"
ActiveWorkbook.SaveAs FileName:= _
"" & newname & ".xls", FileFormat:=xlNormal, _
password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
ActiveWorkbook.Close
Excel.Application.Quit
End Sub