automatisch sorteren

[Magicgirll91]

Hallo allemaal,

Ik weet dat deze vraag al honderden keren is gesteld en ik heb al heel veel doorgelezen, maar ik kom er gewoon niet meer uit.
Nog niet zo lang ben ik bezig met Excel (onder andere voor school) en nu moet ik dus het volgende voor elkaar krijgen. Je moet voor een bepaalde opdracht (er staat wel uitgelegd bij hoe, maar dat is voor Excel 2003 en niet 2007) hoe je automatisch sorteren kan inschakelen. Manueel lukt wel, maar het is vervelend om iedereen keer weer dat knopje in te drukken. Deze oefening is echter niet voor school maar voor mezelf. Ik had alleen gekeken of ik iets kon vinden, maar dit was dus niet het geval.

Nu heb ik een kolom met allemaal cijfers, dubbele cijfers en sommige niet. Voorbeeld:
2
3
2
4
4
7
1
0
0

Echter nu is mijn vraag, hoe kan ik dit automatisch sorteren? Dan wil ik ook graag het volgende vragen. Als ik Manueel gebruik dan krijg ik het volgende:
0
0
1
2
2
3
4
4
7

Tot zover gaat het goed, maar dan wordt er bij 3 eentje bij opgeteld en wordt dus vier, maar blijft op dezelfde plek staan en wordt niet automatisch bijgewerkt en naar onderen verplaatst. Dit is wat ik bedoel
0
0
1
2
2
3 -> 4
4
4
7

wordt dus:
0
0
1
2
2
4
4
4
7

In plaats van wat ik wil:
0
0
1
2
2
4
4
4
7

Ik hoop dat jullie het snappen en mij kunnen helpen, ik heb er al heel veel naar gezocht, maar ik ben er echt niet uitgekomen.

 

[oeldere]

dan toch masar eerst een voorbeeldbestandje, ontdaan van gevoelige info.

 

[HSV]

En wat is het verschil als 4 op de eerste plaats staat van drie vieren, of op de derde plaats.
Een vier is een vier.

 

[trucker10]

Is er logica ? waarom wordt 1 dan geen 2 , want die 1 staat daar ook mar alleen .

 

[Magicgirll91]

Ik heb even een voorbeeldje gemaakt. Hoop dat jullie het snappen.Bekijk bijlage Voorbeeldje.xlsx

 

[trucker10]

Bekijk je voorbeeldje range A41:F46 als je op de knop drukt .

Sorteren op kolom A dan kolom B etc tot laatste kolom F

 

[HSV]

Ik las dat er ook wel een kolom wordt toegevoegd.
Variabel kolom. sorteert op laatste kolom, daarna één na laatste.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim kol
kol = Cells(40, Columns.Count).End(xlToLeft).Column
  With Range("A41:" & Chr(kol + 65) & 46)
  .Sort Cells(40, kol)
  .Sort Cells(40, kol - 1)
  End With
End Sub

 

[oeldere]

excel 2007:

gegevens => sorteren => sorteren op totaal van klein naar groot

niveau toevoegen => sorteren op kolom 5 van klein naar groot

ik heb een macro opgenomen, hoe dit er dan uitziet.

kijk eens of dit is wat je bedoelt.

heb je vragen, laat het gewoon even weten.

 

[Magicgirll91]

@ oeldere dat is precies wat ik bedoelde. Ik ga het morgen even uitproberen aangezien het daar nu wel iets te laat voor is. Ik zal je morgen laten weten of het me is gelukt Alvast bedankt.