wie kann ich nur alle Tabellenblätter löschen
die mit dem Namen Rechnungskopie........... beginnen.
also z.B.: RechnungskopieMaier
RechnungskopieMüller
RechnungskopieSchneider
könnt Ihr mir bitte helfen?
Gruss
Frank
Sub weg()
Dim ws As Worksheet
For Each ws In Worksheets
Application.DisplayAlerts = False
If Left(ws.Name, 14) = "Rechnungskopie" Then
ws.Delete
End If
Application.DisplayAlerts = True
Next
End Sub