Tein tossa levylistaa vanhoista vinyyleistä. Aakkosjärjestely toimii muuten hyvin, mutta miten saan V:llä ja W:llä alkavat järjestetyksi niin että ensin tulis 'yksöis-veet' ja sit tupla-weet?
Nyt järjestyy näin:
Vai Steve
Waits Tom
Wang Chung
Watson Helen
Vaughan Brothers
... Olisko jollain kikka 6 tähän ?
Aakkosjärjestys
v/w
3
636
Vastaukset
- kysymys marraskuussa 2007
eikä silloinkaan kukaan antanut vastausta. Olen itsekin törmännyt monasti samaan "ongelmaan", enkä ole ratkaisua löytänyt.
Openoffice Calcilla tuon saa tehtyä vaihtamalla lajittelun kieltä miltei mihin tahansa eurooppalaiseen kieleen.
Ongelmia tulee vasta kun pitäis saada sekä Aalto Aimo että Älämölö aakkostettua oikein em. lisäksi.
Näyttäisi onnistuvan joillakin kielillä, kuten bokmålilla.
Excelilläkin luulisin, että vastaavan saa tehtyä.normaali array-lajittelulla onnistuu
nimet A-sarakkeessa ja aakkostaa B-sarakkeeseen
Sub Aakkosta()
Dim rarray As Variant
Dim Vika As Double
Dim lkm As Long
Dim lkm2 As Long
Dim Nimi1 As String
Dim Nimi2 As String
On Error Resume Next
Application.ScreenUpdating = False
Range("B:B")= ""
Vika = Range("A65536").End(xlUp).Row
rarray = WorksheetFunction.Transpose(Range("A1:A" & Vika).Value)
For lkm = 1 To UBound(rarray)
For lkm2 = lkm To UBound(rarray)
If UCase(rarray(lkm2)) < UCase(rarray(lkm)) Then
Nimi1 = rarray(lkm)
Nimi2 = rarray(lkm2)
rarray(lkm) = Nimi2
rarray(lkm2) = Nimi1
End If
Next lkm2
Next lkm
Range("B1:B" & UBound(rarray)) _
= WorksheetFunction.Transpose(rarray)
Application.ScreenUpdating = True
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Eutanasia?
Kertokaas omia mielipiteitä eutanasiaan liittyen. Onko mielestäsi oikein vai väärin ja miksi?1112436Eutanasia - miksi eläimelle sallitaan armokuolema, mutta ihmiselle ei?
Olen pitkään ihmetellyt yhtä asiaa Suomessa. Kun koira kärsii parantumattomasta sairaudesta ja kovista kivuista, eläinlä511203Riikka Purran kaudella nousi bensan hinta yli 2 euron
Muistatteko kuinka edellisen vasemmistohallituksen aikana, ns. Marinin aikakaudella, bensiiniä sai 1,3 euron litrahinnal1775122Veli Sofia teki urosmehiläisen työn
Paljastaessaan kuinka TPS:ssä ei joukkuehenki toimi sooloilijoiden vuoksi, jonka takia koko seura ei pärjää kilpailussa333740Mitäs nyt sijoittajat?
Pörssit laskevat maailmalla Iranin sodan takia ja muutenkin ovat olleet Trumpin vallan alla epävarmat. Ainoa, mikä on no1963564Hjallis Harkimon, 72, Jasmine-rakas, 37, paljastaa suhteen alusta: "Vähän..."
Liikemies, kansanedustaja Hjallis Harkimo ja tuottaja-juontaja Jasmine Pajari ovat pariskunta. He asuvat yhdessä Sipooss503159Unisex-vessat
Ahdistaa. Miksi kaikki pitää tasapäistää tasa-arvon nimissä? Tasa-arvo on sitä, että kunnioitetaan sukupuolien erilaisu1092894Jäit kiinni siitä
että katselet minua. Käänsin pääni, minäkin etsin sinua, ja meidän katseemme kohtasivat. Eikä se haittaa - molemmat ky132488Sosiaalidemokratia romahtanut kautta maailman
nuoret eivät enää kannata järjetöntä aatetta, joten demarien täytyy hakea kannattajia mamuista. Ruotsin sos.demit jo kie532185Jutta Larm, 52, haluaa kumota tämän piintyneen ikämyytin
Oletko samaa mieltä? Jutta Larm on 52-vuotias ja tehnyt pitkän uran yrittäjänä. Hän haluaa kumota tämän piintyneen ikämy191985