per Button erstelle ich eine Sicherungskopie einer Exceldatei. Nun möchte ich mit dem selben Button zusätzlich noch ein einzelnes Tabellenblatt "Tabelle3" an einen anderen Speicherort backupen. KÖnntet ihr mir bei der Ergänzung des Codes helfen?
Private Sub CommandButton1_Click()
Const sPath As String = "X:\dateien\Backup"
With ActiveWorkbook
.SaveCopyAs sPath & Format(Now, "YYYY-MM-DD") & "_" & .Name
End With
End Sub