Sort bei Spaltennamen
Peter
ich habe ein Mappe, in der die Spalten Namen haben, hier der Einfachheit Anton und Bruno.
Wie schreibe ich denn nun die Range-Angaben in einem Sort?
Option Explicit
Sub Sortieren()
With ThisWorkbook.Worksheets("Tabelle1")
.Range(.Cells(2, .Range("Anton")), .Cells(14, .Range("Bruno"))).Sort _
Key1:=.Cells(2, .Range("Anton")), Order1:=xlAscending, _
Key2:=.Cells(2, .Range("Bruno")), Order2:=xlAscending, _
Header:=xlNo
End With
End Sub
So mag Excel es nicht.
Gruß Peter