Kirjaimen korvaaminen

pertteli3

Numerosarja, joka sisältää myös kirjaimia, pitäisi muuttaa lukumuotoiseksi, jotta sarjat saadaan numeeriseen järjestykseen ja vielä tietyillä halutuilla tavoilla.

Miten numerosarjan kirjaimet voi kaavalla korvata esim. numerolla nolla? Sarjoissa kirjaimen paikka ei aina ole vakio eikä kirjainkaan vakio.

1

117

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • piece of cake VBA:lla
      et kertonut tuleeko tulos yhteen soluun vaiko esim. koko sarakkeeseen tai riviin
      no molemmat versiot nyt tossa
      yksittäisessä soluversiossa
      tieto esim A1 ja tulos B1
      solussa B1 laita solumuotoiluksi oma: Luku, desimaalit 0
      ja kaava =Luvuksi(A1)

      solualue suoria alla oleva makro LuvuksiAlie

      moduuliin...

      Function Luvuksi(Solu As Range) As Double
      Dim sobj As Object
      Set sobj = CreateObject("vbscript.regexp")
      sobj.Global = True
      sobj.Pattern = "[^0-9]"
      'vaihda allaolevaan riviin korvattava numero nyt siis 0
      Luvuksi = sobj.Replace(Solu, 0)
      End Function

      Sub LuvuksiALue()

      Dim sobj As Object
      Dim solu As Range

      Set sobj = CreateObject("vbscript.regexp")
      sobj.Global = True
      sobj.Pattern = "[^-0-9]"
      'muuta solualue sopivaksi nyt A-sarake
      For Each solu In Range("A1", Range("A65536").End(xlUp))
      solu = sobj.Replace(solu, 0)
      solu.NumberFormat = "0"
      Next solu
      End Sub

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. 157
      3951
    2. Putin lähti takki auki sotaan....

      Luuli, että kolmessa päivässä hoidetaan, nyt on mennyt 3,5 vuotta eikä voitosta tietoakaan. Kaiken lisäksi putin luuli,
      Maailman menoa
      92
      3342
    3. SDP ylivoimainen ykkönen

      En ole koskaan viitsinyt käydä äänestämässä, mutta nyt SDP:n etumatka on niin kutkuttava, että pakkohan se on vaivautua.
      Maailman menoa
      99
      2720
    4. Polttomoottoriauto on köyhän merkki

      Kun ei ole varaa ostaa sähköautoa, niin joutuu köyhän autoa käyttämään.
      Maailman menoa
      283
      2548
    5. Patteriauton ovia ei saatu auki - kuljettaja koki hirvittävän kuoleman!

      ”Oviongelma johti kuskin kuolemaan kolarissa – tämä ratkaisu saatetaan kieltää kokonaan Sivulliset pyrkivät tempomaan a
      Maailman menoa
      39
      2296
    6. Näitä venäjä-faneja tuntuu edelleen vaan riittävän - kummallista

      ja lähinnä siis ihan suomalaisia. Mitä hienoa ja hyvää he näkevät maassa joka on diktatuuri, maassa jossa ei ole sananv
      Maailman menoa
      133
      2011
    7. Sanna on pakottaja, domina

      Pakotti sadistisessti työttömät hakemaan töitä, josta seurasi hirmuinen työttömyys. Näin on asia, jos uskomme Hesarin k
      Maailman menoa
      5
      1646
    8. Mies älä

      Odota enää vaan toimi. Pieni vinkkivitonen 🫰💥
      Ikävä
      42
      1049
    9. Harmittaa ettei paluuta entiseen enää ole

      Paluuta entiseen ei ole koska pilasit kaiken.
      Ikävä
      95
      1018
    10. Mä tiedän

      Että sä tiedät, että mä tiedän, että sä tiedät. Me molemmat tiedetään. Onko näin?
      Ikävä
      53
      899
    Aihe