Sorteren op datum

[henkiebeej]

Het antwoord is vast simpel,
weet iemand hoe ik de volgende selecties kan sorteren op datum?

D4 t/m D19,
I4 t/m I8 en
I14 t/m I18

Bekijk bijlage voorbeeld.xls

 

[Roncancio]

Met VBA kan het heel simpel.

Sub Sorteren()
Range("A4:D18").Sort key1:=Range("D4")
Range("F4:I8").Sort key1:=Range("I4")
Range("F14:I18").Sort key1:=Range("I14")

End Sub

De datum zijn oplopend gesorteerd.

Met vriendelijke groet,


Roncancio

 

[henkiebeej]

Bedankt voor de reactie maar ik werk niet met VBA. Is er een mogelijkheid dat ik dit kan toepassen in Excel? en misschien in het nederlands? Of vraag ik nu teveel?

 

[henkiebeej]

Ik hoopte eigenlijk op "Klik met je rechter muisknop op de kolom en klik op sorteren" haha maar zo simpel is het dus niet.

 

[henkiebeej]

Ik snap trouwens wat je bedoeld. Via de werkblak van VBA de marco een naam geven en dan dat stukje erin plakken.

 

[henkiebeej]

Oke, nu sorteert hij inderdaad op datum. Maar nu is mijn opmaak door de war. Ik had bijv. in de rode tabel "In" een rij wit en dan een rij rood enzovoort. Nu is dat ook helemaal door de war. Weet iemand hoe ik die opmaak misschien kan vastzetten?:S

 

[Roncancio]

Met een formule in de voorwaardelijke opmaak blijft de opmaak behouden.

Met vriendelijke groet,


Roncancio

 

[henkiebeej]

Super, dat is het. Kun je me ook vertellen op welke cellen je dit hebt toegepast en hoe je dit hebt gedaan?

 

[henkiebeej]

Wat ik nu opmerk, de kleuren staan vast maar bijv. de naam van de tabel kan ik wijzigen. ook C19, H9 en H19 kunnen gewijzigd worden terwijl daar de formules instaat die vast moeten blijven staan.

 

[henkiebeej]

Is er ook een andere manier om op datum gesorteren? Macro is niet op iedere pc ingesteld en zal dus ook niet overal werken.

 

[henkiebeej]

Wat ik nu opmerk, de kleuren staan vast maar bijv. de naam van de tabel kan ik wijzigen. ook C19, H9 en H19 kunnen gewijzigd worden terwijl daar de formules instaat die vast moeten blijven staan.
Is er ook een andere manier om op datum gesorteren? Macro is niet op iedere pc ingesteld en zal dus ook niet overal werken.

 

[henkiebeej]

Kijk voorbeeld bestandje van Roncancio

 

[Roncancio]

Dmv een simpele beveiliging kan je voorkomen dat de cellen worden aangepast.
Eventueel met een wachtwoord.

Blad1.Unprotect "Wachtwoord"
Range("A4:D18").Sort key1:=Range("D4")
Range("F4:I8").Sort key1:=Range("I4")
Range("F14:I18").Sort key1:=Range("I14")
Blad1.Protect "Wachtwoord"

Is er ook een andere manier om op datum gesorteren?

Ik neem aan dat de sortering automatisch moet gebeuren en dan vraag ik mij af hoe je dat anders wilt doen.

Met vriendelijke groet,


Roncancio

 

[henkiebeej]

Bedankt voor je reactie, dit is het helemaal! Dank je wel!