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

394

    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ä.

    Luetuimmat keskustelut

    1. Persujen vaalilupaus oli euron bensa

      Nyt puhutaan jo kolmen euron bensasta. Kyseessä on Suomen historian törkein vaalipetos.
      Maailman menoa
      92
      2137
    2. Vain vasemmistohallitus saa minut menemään töihin

      Änkyräkapitalistien sortaessa kansaa en laita rikkaakaan ristiin. Elän mielummin Kelan tuilla, ja jos niitä leikataan, n
      Maailman menoa
      34
      2090
    3. Maataloustuet perittävä korkojen kera takaisin

      Yrittäjiltä jotka ovat myyneet tuotantoaan ulkomaille. Veronmaksajan kustantama tuki on tarkoitettu elintarvikkeiden hi
      Maataloustuki
      50
      1835
    4. Topi osti Askon

      Hieno mies. Pelastaa työpaikkoja. Kiitokset myös emännälleen, joka pitää isännän virkeänä. https://www.is.fi/taloussan
      Maailman menoa
      75
      1370
    5. Mitä kirjainta kaipaat?

      Pitkästä aikaa tämmöistä. Onko kirjain muuttunut edellisestä. ☺️
      Ikävä
      86
      1251
    6. Kastaa ja upottaa on eri sanat

      Kastaa ja upottaa on eri sanat ja niillä on eri merkitys. Eikä Jeesusta haudattu upottamalla maahan kaivettuun kuoppaan
      Kaste
      219
      1141
    7. Uskomatonta touhua!

      Ei olis uskonut että kateus yrittäjää kohtaan menee noin pitkälle. TTP:ssa irrotettu sähköjohto jäätelöaltaasta. Kaikki
      Haapavesi
      31
      1060
    8. Oliko se oikeasti epäselvää

      sinulle että olin ihastunut sinuun? (Ymmärrän että siitä on aikaa, eikä voi olettaa että kaikkea muistaisi tai että men
      Ikävä
      56
      1013
    9. Miten hän sinua katsoi?

      😊😊😊😊😊😊
      Ikävä
      67
      936
    10. Miksi eduskuntatalon portaille sytyttään tänään 8 645 kynttilää?

      Oikeus elämään ry järjestää lauantaina 21.3.2026 tapahtuman, jossa Eduskuntatalon portaille sytytetään 8 645 kynttilää.
      Luterilaisuus
      283
      904
    Aihe