excelbestand op alfabetische volgorde

[jeroen1972]

Hallo,

ik heb een excelbestand van circo 5500 klanten met een heleboel kolommen. Deze moet ik in alfabetische volgorde krijgen. Hoe doe ik dit. Hierna moet ik een unieke code aanmaken. Kan ik iets van bv nummer KL000000001 door laten lopen tot KL000050000?
Zo ja hoe doe ik dit.

Gr, Jeroen

 

[Wigi]

1. Zie Data > Sorteren

2.

Zet in een extra kolom:

="KL"&TEKST(rij();"000000000")

Kopieer vervolgens voor elke klant.

Wigi

 

[robdgr]

Jeroen,

Als je de volgende macro aanpast en koppelt aan een knop kun je sorteren:

Sub Sorteer_inhoud()

'
Application.ScreenUpdating = False
    Range("B5:B1130").Select
    Selection.Sort Key1:=Range("B4"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
    Range("A3").Select
Application.ScreenUpdating = True

End Sub

Voor het klantnummer moet een vast gegeven hebben anders krijg je iedere keer een ander nummer na sortering. Je kunt iets maken in de trant van

="Kl"&HERHALING(0;8-LENGTE(RIJ()))&RIJ()

Je zult deze nadien moeten kopieren en plakken speciaal om te voorkomen dat dit nummer verandert.

 

[arafy]

jeroen,

het zijn goede oplossingen die je krijgt. je kan ook het forum eens doorzoeken. ik heb al verschillende antwoorden gegeven op een dergelijke vraag.
denk er wel aan om je formules naar waarden te kopiëren, anders kom je in de problemen.

steven

 

[wildboy]

Hey Jeroen,

Het sorteren is geen probleem zoals Wigi al heeft verteld.
ga in de kolom staan die je wil sorteren
vervolgens ga je naar Data>>sorteren in de popup zullen de meeste instellingen nu al goed staan. klik op ok en er wordt gesorteerd.

Als dit goed gegaan is voeg je een kolom toe op de gewenste plaats.
ik neem als voorbeeld even kolom A.
ik zet er bv op a1 klantnummer boven.
en selecteer A2,
nu rechter muis naar celeigenschappen in het eerste Tabblad: getal
ga je naar aangepast en zet daar bij type: "KL"000000000
nu klik je op OK
type in a2 : 1 en vervolgens enter

resultaat KL000000001

nu doorvoeren naar beneden en klaar ben je.
kom je er niet uit je weet ons te vinden.

 

[Wigi]

De suggestie van Eric is zeer goed als je nog andere bewerkingen wil uitvoeren met de klantnummers. Het blijven gewoon getallen.