PDA

Vollständige Version anzeigen : Spalte löschen


Edda
18.03.2009, 11:14
Hallo Ihr,

ich habe Excel 2003.
Ich möchte in einer Liste eine Spalte löschen.
Es soll nach einer bestimmten Überschrift gesucht werden (z. B.: Ort) und danach soll diese Spalte "Ort" gelöscht werden.
Das Problem ist, dass diese Überschrift (Ort) nicht immer in der selben Spalte steht.

Kann mir jemand helfen?

Danke
Edda

chris-kaiser
18.03.2009, 11:58
hiho

Sub findMe()
Dim objCol As Object
'habe mal angenommen das die Überschrift in Zeile 1 ist
Set objCol = Rows(1).Find("Ort", lookat:=xlWhole)
If Not objCol Is Nothing Then
objCol.EntireColumn.Delete
End If
End Sub

Edda
18.03.2009, 12:39
Hallo chris-kaiser,

hat supi funktioniert.

Danke