I have an application I have built into Excel where the last page is
either printed or should be saved to the users desktop. I have the
print function working without a problem. However, when I use the
following code;
Private Sub CommandButton2_Click()
If CommandButton2.Caption = "Click Here to Save This Page" Then
ActiveWorkbook.SaveCopyAs "C:\My_Development_Plan.xls"
Else
CommandButton2.Caption = "Click Here to Save This Page"
End If
End Sub
I can only figure out how to save the workbook, I need to save the
single sheet (the active sheet) in a new workbook on their desktop. Is
there a simple way to copy the active sheet into a New Workbook and
save that new workbook to their desktop (or C drive if it has to?)
Bookmarks