Sehr geehrtes Forum,
Ich habe folgendes Proble:

Ich habe ein Programm geschrieben mit dem man in einer Hauotmaske mehrere Sachen aus eienr Liste auswählen kann.

Die Liste setzt sich zusammen aus Namen von Sheets, die in einer anderen Excelldatei sind.
Das Ausgewählte wird dann von dieser anderen Excelldatei in die eigentliche Arbeitsmappe kopiert.
Wenn ich nun noch einmal von vorne beginnen will, soll ein Button alle sheets löschen, die neu dazugekommen sind.
Das habe ich mit folgender For-Schleife realisiert.

Nun ist mein Problem, das er nur jedes zweite sheet löscht.

 If Sheets.Count > 7 Then       'wenn es mehr als 7 sheets 
                
    Application.DisplayAlerts = False          
        
                       For k = 7 To v_new + 4 Step 1    'v_new ergibt sich aus der Summe der neuen sheets, 
             
                                                        '+4, weil es erst ab dem 4. Sheet löschen soll
                            
                                   Sheets(k).Delete           'löscht die neuen sheets
                
                       Next
        
                     Application.DisplayAlerts = True          
        
 End If