Merkkien lisääminen soluun

Onnistuk

Ongelma:
solussa teksti tai numero sarja esim

Pekka
3456234
34jorma45

joka pitäisi muuttaa näin:

P*e*k*k*a
3*4*5*6*2*3*4
3*4*j*o*r*m*a*4*5

Merkkien poisto välistä hoituisi helposti, mutta miten toi lisääminen onnistuisi excelillä?

4

211

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • atk-höppänä
      • Onnistuk

        Kiitoksia atk-höpänä! Funktio toimii hienosti, mutta lisää yhden ylimääräisen merkin * -merkin, mitäköhän funktioon pitäisi lisätä/poistaa että se ei tulostaisi sitä viimeistä * merkiä?


      • atk-höppänä
        Onnistuk kirjoitti:

        Kiitoksia atk-höpänä! Funktio toimii hienosti, mutta lisää yhden ylimääräisen merkin * -merkin, mitäköhän funktioon pitäisi lisätä/poistaa että se ei tulostaisi sitä viimeistä * merkiä?

        Kokeile vaihtaa toiseksi viimeisen rivin "AddSpace = Trim(AddSpace)" tilalle

        AddSpace = Left(AddSpace, Len(AddSpace) - 1)


      • Onnistuk
        atk-höppänä kirjoitti:

        Kokeile vaihtaa toiseksi viimeisen rivin "AddSpace = Trim(AddSpace)" tilalle

        AddSpace = Left(AddSpace, Len(AddSpace) - 1)

        Lämmin kiitos atk-höppänä!
        On se helppoa, kun osaa!
        Kiitos vielä kerran!

        Tässä vielä koko rimpsu, jos muu sattuu tarvitsemaan tätä:

        Function AddSpace(Str As String) As String
        Dim i As Long
        For i = 1 To Len(Str)
        AddSpace = AddSpace & Mid(Str, i, 1) & "*"
        Next i
        AddSpace = Left(AddSpace, Len(AddSpace) - 1)
        End Function


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

    Takaisin ylös

    Luetuimmat keskustelut

    1. Mihin kaivattusi

      Ja sinun juttusi kaatui?
      Ikävä
      160
      6981
    2. En löydä sinua

      En löydä sinua täältä, etkä sinä varmaankaan minua. Ennen kirjoitin selkeillä tunnisteilla, nyt jätän ne pois. Varmaan k
      Ikävä
      26
      4088
    3. Ketä julkkista

      kaivattunne muistuttaa?
      Ikävä
      47
      3397
    4. Eelin, 20, itsemurhakirje - Suomalaisen terveydenhuollon virhe maksoi nuoren elämän

      Yksikin mielenterveysongelmien takia menetetty nuori on liikaa. Masennusta sairastava Eeli Syrjälä, 20, ehti asua ensi
      Maailman menoa
      135
      3138
    5. Opettelen sun jokaisen virheen

      ja rakastan sua.
      Ikävä
      51
      2906
    6. Ne oli ne hymyt

      Mitä vaihdettiin. Siksi mulla on taas niin järjetön ikävä. Jos haluat musta eroon päästä niin älä huomioi mua. Muuten kä
      Ikävä
      26
      2286
    7. Miten, milloin

      Se onnistuisi sun luona
      Ikävä
      43
      2256
    8. Hajoaako persut kuten 2017?

      https://www.is.fi/politiikka/art-2000011217813.html Tämä on totisinta totta. Persut on murroksessa. Osa jättää puolueen
      Maailman menoa
      272
      2013
    9. Kamala uutinen: Henkilö kuoli Tokmannin pihaan Kankaanpäässä- Jäi trukin alle

      IL 9.5.2025 Ihminen kuoli Kankaanpään Tokmannin edustalla perjantaina aamupäivästä. Poliisin mukaan henkilö oli jäänyt
      Kankaanpää
      55
      1975
    10. Mitä haluat oikeasti

      Mun ymmärtävän? Sitäkö ettet rakasta ja ole valmis mihinkään?
      Ikävä
      29
      1856
    Aihe