habe folgenden code:
Private Sub CommandButton1_Click() 'tabellen anlegen
Dim i As Integer
For i = 1 To 3
Sheets("vorlage").Select
Sheets("vorlage").Copy After:=Sheets(1)
Sheets("vorlage (2)").Select
Sheets("vorlage (2)").Name = ("" & i)
Next i
End Sub
Private Sub CommandButton2_Click() 'tabellen loeschen
Dim blatt As Object
Application.DisplayAlerts = False
For Each blatt In Sheets
If blatt.Name <> "vorlage" Then 'vorlage nicht loeschen
blatt.Delete
End If
Next blatt
Application.DisplayAlerts = True
End Sub
wenn ich nun löschen ausführe kommt debugger kann nicht in haltemodus wechseln?
habe aber kein haltepunkt gesetzt
woher koennte der fehler kommen?
kann ich diesen mit on error resume next unterdrücken ?
danke
gruss roland_k