ich sortiere mit dem unten stehendem Macroteil bestimmte Spaltenbereiche,
jeweils nebe dieser zu sortierenden spalte habe ich folgende Formel zu stehen
=SUMMEWENN(vorlageliste!$S$8:$S$114;Vorlagebestellung!$S11;vorlageliste!$T$8:$T$114)
diese Formeln sollen sich jedoch nicht mit sortieren da Sie dann falsche Werte liefert.
dies wäre so eine zu sortierende liste.
hat jemand eine Idee wie ich diesen Spaltenbereich sortieren kann
liebe grüsse thomas
M
XL
L
40
50
60/62
48/50
60
XXL
S
With Worksheets(2)
'Worksheets(1).Range("c2:c255").Sort Key1:=.Range("c2"), Order1:=1, Header:=xlNo
Worksheets(2).Range("b8:b113").Sort Key1:=.Range("b8"), Order1:=1, Header:=xlNo
Worksheets(2).Range("e8:e113").Sort Key1:=.Range("e8"), Order1:=1, Header:=xlNo
Worksheets(2).Range("g8:g113").Sort Key1:=.Range("g8"), Order1:=1, Header:=xlNo
Worksheets(2).Range("j8:j113").Sort Key1:=.Range("j8"), Order1:=1, Header:=xlNo
Worksheets(2).Range("m8:m113").Sort Key1:=.Range("m8"), Order1:=1, Header:=xlNo
Worksheets(2).Range("o8:o113").Sort Key1:=.Range("o8"), Order1:=1, Header:=xlNo
Worksheets(2).Range("q8:b113").Sort Key1:=.Range("q8"), Order1:=1, Header:=xlNo
Worksheets(2).Range("s8:s113").Sort Key1:=.Range("s8"), Order1:=1, Header:=xlNo
Worksheets(2).Range("u8:u113").Sort Key1:=.Range("u8"), Order1:=1, Header:=xlNo
Worksheets(2).Range("x8:x113").Sort Key1:=.Range("x8"), Order1:=1, Header:=xlNo
End With
End Sub