[Løst] excel vba sette inn mellomrom i tekst

[Bigelk]

Hei.

 

jeg vil ha dette

606010

til og bli dette

6060 10

 

Noen som kan hjelpe til med det?

 

Mvh

 

Torbjørn

[osmoen]

En enkel løsning uten å vite mer om problemet ditt.

 

Dersom A1 inneholder 606010 kan formelen være:

=VENSTRE(A1;4)&" "&HØYRE(A1;2)

ev. oversett til riktig språk.

 

Red.: ser selvsagt nå at det er snakk om vba

Endret 4. desember 2012 av Frikky

[keas]

Like enkelt i vba

 

[A1] = Left([A1], 4) & " " & Right([A1], 2)

[Bigelk]

Hei.

 

Takk for svar

 

Har du en enkel måte for og få den til og fungere med hele Kolonne "A"?

Eneste måten jeg fikk den til og fungere på flere celler var ved å lage en loop.

 

MVH

 

Torbjørn

Endret 4. desember 2012 av Bigelk

[keas]

Nei, jeg kjenner ingen enklere metode i vba.

Du kan legge inn en matriseformel i en annen kolonne, men jeg ser ikke det som enklere når du benytter vba.

[Bigelk]

ok, da looper jeg bare igjennom kolonne A.

 

Koden

Dim R As Integer
R = 1
For R = 1 To 100
Cells(R, 1) = Left(Cells(R, 1), 4) & " " & Right(Cells(R, 1), 2)
Next R

 

Tusen takk for hjelpen

 

MVH

 

Torbjørn