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ä?
Merkkien lisääminen soluun
Onnistuk
4
212
Vastaukset
- atk-höppänä
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- 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
- 477745
- 334293
- 573775
- 503220
- 172916
Voi ei! Jari Sillanpää heitti keikan Helsingissä - Hämmästyttävä hetki lavalla...
Ex-tangokuningas on parhaillaan konserttikiertueella. Hän esiintyi Savoy teatterissa äitienpäivänä. Sillanpää jakoi kons692656- 682550
- 582479
- 402349
- 162306