2 Spalten ganz rechts löschen



Excel-Version: 9.0 (Office 2000)
nach unten

Betrifft: 2 Spalten ganz rechts löschen
von: N. Davidheimann
Geschrieben am: 14.05.2002 - 23:49:46

Hallo allerseits,

wie könnte eine VBA-Zeile aussehen, mit der ich die zwei letzten Spalten im Datenbereich lösche ??

Gruß
Norbert


nach oben   nach unten

Re: 2 Spalten ganz rechts löschen
von: Klaus Schubert
Geschrieben am: 15.05.2002 - 00:25:22

Hallo Norbert,

wie wär's hiermit:


Sub SpaltenRechtsLöschen()

Dim As Integer
i = ActiveSheet.UsedRange.Columns.Count

Columns(i).Delete
Columns(i - 1).Delete
End Sub


Gruß Klaus

nach oben   nach unten

Re: 2 Spalten ganz rechts löschen
von: N. Davidheimann
Geschrieben am: 15.05.2002 - 09:16:04

Hallo Klaus,

sowas hatte ich im Sinn. Danke Dir ganz herzlich.

Gruß
Norbert


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "2 Spalten ganz rechts löschen"