Sorteren op 2 cellen

[johngub]

Hallo,

Graag zou ik sorteren op cel B en C (B=datum en C=Tijd) en dan tot L

ik heb al een formule die werkt goed maar alleen op cel B
Ik heb zelf al het een en het ander geprobeerd maar heb er te weinig kennis van

Sub Sorterendatabase_begindatum()
Range("B2:L" & Range("B" & Rows.Count).End(xlUp).Row).Sort Key1:=Range("B2"), Order1:=xlAscending, Header:=xlYes
End Sub

 

[VenA]

Range("B2:L" & Range("B" & Rows.Count).End(xlUp).Row).Sort Range("B2"), , Range("C2"), , , , , xlYes

of zonder het bestandje te zien.

Cells(2, 2).CurrentRegion.Sort Range("B2"), , Range("C2"), , , , , xlYes

 

[johngub]

Code werkt prima Bedankt voor de snelle reactie :thumb: