Solu sisältää tekstiä, joka koostuu etunimestä, sukunimestä ja syntymävuodesta. Samassa solussa voi olla kymmeniä nimiä syntymävuosineen. Välillä tiedot on eroteltu pilkulla, useimmiten on vain tyhjä väli. Syntymä vuosi on välillä ilmoitettu kokonaisena, välillä taas vain viimeiset kaksinumeroa.
Esim: Minna Marjanen 2001, Eveliina Erämetsä 1999,........
Esim: Minna Marjanen 2001 Eveliina Erämetsä 1999.....
Esim: Minna Marjanen -01 Eveliina Erämetsä -99....
Voiko jollain kaavalla laskea montako nimeä solu sisältää? Näitä soluja on niin hervottomasti ja rimpsut on pitkiä, että on vaikea yksittäin laskea.
Solun tekstitiedosta laskeminen
5
98
Vastaukset
- Tämmöinen
Seuraava makrofunktio kasvattaa laskuria aina kun tulee uusi numero:
Function lkm(s As String) As Integer numero = False n = 0 For i = 0 to Len(s) If Mid(s, i, 1) >= "0" And Mid(s, i, 1) <= "9" Then If Not numero Then n = n 1 numero = True End If Else numero = False End If Next i lkm = n End Function- Tämmöinen
Piti olla: For i = 1 to Len(s)
- Peettu
En osaa tuota käyttää. Mihin se laitetaan?
Nyt tuli vielä uusi vaihtoehtokin niin, että onkin kolme nimeä ja sitten niillä yhteinen syntymä aika. - Tämmöinen
Peettu kirjoitti:
En osaa tuota käyttää. Mihin se laitetaan?
Nyt tuli vielä uusi vaihtoehtokin niin, että onkin kolme nimeä ja sitten niillä yhteinen syntymä aika.Kopioi tekemäni funktio tuosta ylhäältä leikepöydälle. Paina Excelissä hiiren oikealla ruudun alaosassa sivunvalinnasta sivun nimeä (Sheet1) ja sieltä View Code. (Aukeaa VBA.) Valitse tuon ikkunan yläosasta Insert ja sieltä Module. (Syntyy uusi moduli Module1.) Liimaa funktio luomaasi siihen. Suomennetussa Excelissä nimet ovat jotain ihan muuta, mutta tuon mukaan selvinnet.
Jos haluat tietää solussa A1 olevien nimien lukumäärän, kirjoita =lkm(A1)
Makroja sisältävä tiedosto on talletettava muodossa *xlsm.
Funktio lkm laskee solussa olevat syntymäajat (=luvut). Se ei tarkista niiden oikeellisuutta, onko sama nimi useampaan kertaan, tai onko lukujen välissä nimeä ensinkään. - Peettu
Kiitos. Nythän se toimii. Ja helpottaa.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Kalajoen hukkuneet pojat olivat tummaihoisia
Jälleen kerran, hukkuneet tai heikon uimataidon vuoksi vaaraan joutuneet olivat muita kuin suomalaisia. Turha viisastell3237075Kysymys muille miehille
Onko teille varattu nainen ongelma? Mikään muu naisessa ei töki kun se että hän on varattu. Kamppailen houkutuksen kanss714258- 2083155
Kohta katson sun kuvaasi
ja päästän ajatukseni liitämään. Jo kuvasi näkeminen rauhoittaa, ja pistää hyrräämään vähän muutakin. Ihanan kaunista sa242937- 741952
- 1491781
Ahneus iski Fazeriin, suklaalevy kutistuu 180 grammaan
Kun mikään ei riitä. Shrinkflaatio. Mitä isot (Marabou) edellä, sitä pienet (Fazer) perässä. Pienikin voi siis olla a2121746Jos kaivattusi on perääntynyt lähestyessäsi
jossain tilanteessa, ymmärrätkö miksi hän saattoi tehdä sen?1651560Minkä asian haluaisit muuttaa kaivatussasi?
Mikä kaivattusi luonteessa tai ulkonäössä ärsyttää sua?1201548- 891438