Kenttien merkkien tutkiminen

jennisentti

2 ongelmaa tilanteessa, jossa sarakkeessa A on asiakastunnuksia:
1. Osa on henkilötunnksia, joissa on välimerkki PPKKVV jälkeen. Pitää siirtää sarakkeeseen B ne asiakastunnukset, joissa on 7. merkkinä - tai A.
2. Osa on yritysten y-tunnuksia, mutta niissä on se virhe, että - on väärässä paikassa - pitäisi olla ennen viimeistä numeroa, mutta se onkin ennen 2 viimeistä numeroa. Eli nyt ne on muotoa 12345-67 oikein olisi 123456-7. Mitenkäs tämä korjataan? Kopioisin ne sarakkeeseen C.

1

169

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • ORCL

      Makro moduuliin:

      Sub Sarakkeisiin()

      Dim VikaRivi As Long
      Dim Solu As Range
      Dim YritysTunnus As String

      VikaRivi = Range("A1048576").End(xlUp).Row
      For Each Solu In Range("A1:A" & VikaRivi)
      If Mid(Solu, 7, 1) = "-" Or Mid(Solu, 7, 1) = "A" Then
      Solu.Offset(0, 1).Value = Solu.Value
      End If
      If (Mid(Solu, 6, 1) = "-") Then
      YritysTunnus = Replace(Solu.Value, "-", "")
      YritysTunnus = Left(YritysTunnus, 6) & "-" & Right(YritysTunnus, 1)
      Solu.Offset(0, 2).Value = YritysTunnus
      End If
      Next Solu
      End Sub

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

    Luetuimmat keskustelut

    1. Vasemmistohallitus palauttaa hintasääntelyn, esim. bensalitra vain 1e.

      Tuleva vasemmistolaisista koostuva hallitus ottaa käyttöön vanhat hyvät keinot pitää hinnat kurissa. Tähän tarkoitukse
      Maailman menoa
      81
      4620
    2. Vasemmistolainen valehteli jälleen - Purra tai persut eivät luvanneet "euron bensaa"

      Väite "euron bensasta" on ensisijaisesti poliittisten vastustajien käyttämä puhdas vale. Persut kyllä kampanjoivat näky
      Maailman menoa
      109
      3837
    3. Arman Alizadin viesti puna-aktivisteille: "Pitäkää lärvinne nytkin kiinni"

      Arman Alizad kritisoi vasemmiston kaksinaismoralismia. Iranissa syntynyt suosikkijuontaja Arman Alizad pakeni perheensä
      Maailman menoa
      176
      3627
    4. Minja Koskela nostanut vasemmistoliiton kannatuksen ennätykseen

      Koskela valittiin puolueen johtoon lokakuussa 2024, ja silloin Ylen kysely antoi puolueelle 9,3 prosentin kannatuksen.
      Maailman menoa
      63
      2062
    5. Antti johtaa Petteriä jo 7,1 prosenttiyksiköllä

      Tällä menolla sdp menee kokoomuksesta kierroksella ohi jo tällä vaalikaudella. https://yle.fi/a/74-20213575
      Maailman menoa
      71
      1928
    6. Mitä on tullut

      Entisen abcn rakennuksen tilalle se oli tyhjillään monta vuotta siellä oli jo nyt valot onko huoltoasema? 5:30.
      Haapavesi
      78
      1268
    7. Harmi nainen kun

      olet niin elähtäneen näköinen. Miestä et koskaan löydä itelles. j
      Ikävä
      128
      1125
    8. Palosta selvinnyt 18 vuotias munira tarvitsi tulkin kun puhui Iltalehdelle

      Suomessa asuva 18 vuotias tarvii tulkin !!! Tää Suomea puhumaton on palossa kuolleen naisen veli ja asui perheen kanssa.
      Vantaa
      140
      1050
    9. Minne pyydän sut?

      Jotta saan nähdä 🤨
      Ikävä
      49
      979
    10. Mikä homma?

      https://share.google/NvruSS4P4EzjTWPov Poliisilla oli keskiviikkona 4. maaliskuuta yksityisasunnossa Saarijärvellä tehtä
      Saarijärvi
      26
      891
    Aihe