Sortieren nach Spalte I
12.08.2018 12:34:30
Claudia
Hallo,
ich möchte gerne nach Spalte I Sortieren.
Ich habe folgenden Code, der auch funktioniert:
Sub SortierenAnteilUmsatz()
Dim strSpalte As String
Dim strBereich As String
Dim LetzteZeile As Long
LetzteZeile = Letzte_Zeile()
'Parameter
strBereich = "A1:I26"
strSpalte = "C"
'Sortieren
With Tabelle1
Range(strBereich).Sort _
Key1:=Range(strSpalte & "2"), Order1:=xlAscending, _
Header:=xlYes, MatchCase:=True
End With
End Sub
Allerdings möchte ich nicht "I26" dort stehen haben, sondern "LetzteZeile", damit die Tabelle variabel lang sein soll. Da klappt so natürlich nicht.
Habt ihr eine Ahnung, wie ich den Code verändern könnte, damit der Code so klappt, wie ich ihn haben möchte?
LG Claudia
Anzeige