datums automatisch op volgorde krijgen.

[saffier1990]

Hallo,

Ik ben een lijst aan het maken met houdbaarheidsdatums.. Nu wil ik dat als ik of 1 van me collegas een datum aanpast hij automatisch weer op volgorde komt. Wel uitgevonden hoe het handmatig moet maar automatisch krijg ik het niet voor elkaar..

 

[ExcelAmateur]

saffier1990,

Heb je ook gekeken bij Sorteren / Aangepast sorteren?

 

[saffier1990]

Zo heb ik hem handmatig op volgorde gekregen ja, maar hoe krijg ik het dan zo ingesteld dat het automatisch gebeurd?

 

[Joske2000]

Kleef onderstaande code achter sheet1 :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i As Long
    i = Sheets("Sheet1").Range("A65536").End(xlUp).Row
    Sheets("Sheet1").Range(Cells(1, 1), (Cells(i, 2))).Sort Key1:=Range("B1"), Order1:=xlAscending, Header:=xlNo, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal

End Sub

Joske

 

[saffier1990]

Geweldig!!! Super bedankt Joske dat heeft perfect gewerkt!