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ä?
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ä?
Vastaukset 4
Vanhimmat
Selkein on tehdä varmaan oma funktio. Apinoi tuon linkin AddSpace-funktiota ja vaihda keskimmäisen rivin viimeisenä olevan " " tilalle "*".
https://www.extendoffice.com/documents/excel/3465-excel-add-space-between-characters.html
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)
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