JAreMANNENMedlem sedan aug. 20001 698 inlägg
Hajj hajj!!
Hur gör man om jag tex vill infoga ett blanksteg 5 tecken fram i texten som finns i kolumnen??
Exempel:
Har en kolumn med över 2000 postnummer...
50458<- Såhär ser de ut nu
504 58<- Såhär vill jag att de skal se ut
Lite jobbigt för fingrarna att infoga ett blanksteg på över 2000 rader.. :h
Borde väl gå med nåt marko eller nåt kanske... :q
Eller har någon ett annat bra prog för detta??
MVH
------------------
Det är lättare att leva ett rikt liv som ung, när man vet att det väntar ett som gammal
E-post
clarkbonesMedlem sedan feb. 20012 693 inlägg
Sub fighter()
Do Until ActiveCell.Offset(0, 0).Value = ""
str1 = ActiveCell.Value
str2 = Left(str1, 3) & Chr(32) & Right(str1, (Len(str1) - 3))
ActiveCell.Value = str2
ActiveCell.Offset(1, 0).Select
Loop
End Sub
RikardMedlem sedan dec. 19998 623 inlägg
Wow! clarkbones, jag anar att du, om du orkar fortsätta så här - vilket jag hoppas - kommer att få mig att sakta men säkert lära mig använda VBScript! :D
*man bugar*
Vilken lösning!
med vänliga
Rikard
forumledare, webForum
clarkbonesMedlem sedan feb. 20012 693 inlägg
Åh, vad det är härligt med smicker! Jag kommer att dyka upp här fortsättningsvis, var så säker.
clarkbones
RikardMedlem sedan dec. 19998 623 inlägg
Det gläder mig! :)
------------------
...för övrigt anser jag att Skywalker ska återgå till sitt gamla användarnamn Bire.
LaspMedlem sedan juli 200010 197 inlägg
Snygg lösning
men Excel klara detta lätt så här:
=VÄNSTER(A1;3)&" "&HÖGER(A1;2)
i kolumnen bredvid A tex. Dra sedan ner formeln paralellt.
Samma principkannvändas för föregående fråga om mellanslag.
------------------
GvdsSfdtTddv.
clarkbonesMedlem sedan feb. 20012 693 inlägg
Bra påpekande! Man skall inte göra det mer tillkrånglat än nödvändigt.
CarlWMedlem sedan apr. 200140 inlägg
Ännu enklare är kanske att välja Format-Celler-Special-Postnummer alternativt Anpassat och skriva: 000\ 00
------------------
CW