Register löschen var. Anzahl/unb. Name

Forumthread: Register löschen var. Anzahl/unb. Name
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Register löschen var. Anzahl/unb. Name

bruno

Hallo
Habe ein Excelfile, das ich per Makro "reinigen" möchte. Dabei möchte ich auch, sofern vorhanden, alle Register ausser die ersten vier, löschen. Die Namen sind jedes mal unterschiedlich von den zu löschenden Register und die Anzahl auch.
Wie sollte der Makrocode aussehen?
Gruess
de Bruno

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

AW: Register löschen var. Anzahl/unb. Name

GuentherH
AW: Register löschen var. Anzahl/unb. Name

bruno

AW: Register löschen var. Anzahl/unb. Name

10.11.2011 22:48:40

GuentherH


Public Sub BlaetterUeber4Loeschen()
If Sheets.Count > 4 Then
Application.DisplayAlerts = False
For I = 5 To Sheets.Count
Sheets(Sheets.Count).Delete
Next I
Application.DisplayAlerts = True
End If
End Sub

Beste Grüße,
Günther

AW: Register löschen var. Anzahl/unb. Name

10.11.2011 23:20:17

bruno

Besten Dank, es funkt.
bruno