Merkkien vaihtaminen solussa?

Anonyymi

Haluan vaihtaa solujen tietyt merkit toisiin. Esim, jos solussa on abc, niin haluan vaihtaa a-kirjaimet kirjaimeen z, b-kirjaimet kirjaimeen x ja c-kirjaimet kirjaimeen y.
Eli abc näkyisi uudessa solussa muodossa xyz. Löysin KORVAA toiminnon, mutta sillä saa vaihdettua vain yhden merkin kerrallaan.

4

144

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Anonyymi

      Melkein tuohon kannattaa oma funktio kirjoittaa.

      • Anonyymi

        Sub vaihda()
        ' Vaihtaa valitulla alueella vanhat merkit vastaaviin uusiin.
        vanha = Split("a b c", " ")
        uusi = Split("x y z", " ")
        Dim solu As Range
        For Each solu In Selection
        For i = 0 To UBound(vanha)
        Debug.Print vanha(i) & " " & uusi(i)
        solu.Value = WorksheetFunction.Substitute(solu, vanha(i), uusi(i))
        Next i
        Next
        End Sub


    • Anonyymi
    • ilman turhia luuppauksia

      Sub Korvaa()
      Dim originaalit As Variant
      Dim korvaavat As Variant
      Dim x As Long
      originaalit = Array("A", "B", "C", "a", "b", "c")
      korvaavat = Array("X", "Y", "Z", "x", "y", "z")
      For x = LBound(originaalit) To UBound(originaalit)
      Selection.Replace What:=originaalit(x), Replacement:=korvaavat(x), _
      LookAt:=xlPart, MatchCase:=True
      Next
      End Sub

      Keep EXCELing
      @Kunde

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

    Luetuimmat keskustelut

    1. Ässät feikki ero

      Stefanhan se siellä Sonjan ja Sofian juhannus kuvien taustalla. Kaksi tyhmää naista ja vielä tyhmempi mies. Oliko tämä ero vain epätoivoinen yritys sa
      Kotimaiset julkkisjuorut
      104
      2337
    2. Miksi vanhat äijät

      Luulee, että nuori nainen haluaisi niiden homeista munaa? Saati että joku nuori nainen pitäisi heistä muuten? Voi reppanat. Jos sulla on paljon rahaa,
      Sinkut
      133
      1286
    3. En haluaisi uskoa että miehet ajattelee vain munallaan,

      mutta taas sain olla väärässä. Eli.. törmäsin männäviikolla puolituttuun mieheen työmatkalla. Hän kertoi, että viettäisi juhannusta minun kotikaupun
      Sinkut
      306
      1263
    4. Ärsyttävimpiä ihmistyyppejä

      Itselleni yksi ärsyttävimmistä ihmistyypeistä on takertujat. Sellaiset, joille on kohtelias, ei tuomitse heitä niin kuin monet muut tuomitsee jne. Ärs
      Sinkut
      175
      1097
    5. Somalisulhanen syö Sara Siepin suosiota

      Ei kelvannut Sara Sieppi enää kummankaan iltapäivälehden juhannustytöksi. muutenkin tykkäysmäärät näyttävät laskeneen ja ilmeisesti myös Saran seuraa
      Kotimaiset julkkisjuorut
      64
      1015
    6. 58
      913
    7. Kuulispas se oikea

      henkilö mun anteeksipyynnön tään. Tajuis, että tämä aloitus oli just multa, pystyis ymmärtää mua edes jollainlailla. Turhaa sanojen helinää tääkin, lu
      Tunteet
      33
      851
    8. Juhannuksen pilaaminen ruohonleikkurilla

      Vois naapuriki ajatella onko pakko juhannusaattona leikata nurmikkoa samaan aikaan kun muut naapurit köllöttelee pihalla ja pelaavat krokettia ja naut
      Kokkola
      77
      801
    9. Eri ikäiset parit

      Tämän ajankohtaisen lapsia ahdisteleva setä-keskustelun innoittamana aloitan vähän laajemman ikäkeskustelun. Oma kantani on, että kunhan kumpikin on
      Sinkut
      111
      784
    10. Yhden viestin päässä

      Voisit juuri tälläkin hetkellä olla tässä vieressäni. Silittelisin ja paijaisin sinut puhki.
      Ikävä
      41
      766
    Aihe