Formattering af flettefelt

Der findes ikke en sådan konvertering, men du kunne køre denne makro i Excel før du brevfletter: Den slitter numrene op i den kolonne kursoren er placeret i.

Sub OpsplitTlfNr()

On Error Resume Next
'Finder den kolonne cursoren er placeret i
AktivKolonne = ActiveCell.Column
AktivRaekke = ActiveCell.Row

'Finder den sidste celle, der er skrevet noget i
ActiveCell.SpecialCells(xlCellTypeLastCell).Select
SidsteRaekke = ActiveCell.Row

For n = 2 To SidsteRaekke
    If Cells(n, AktivKolonne).Value <> "" Then
   

        Streng = Cells(n, AktivKolonne).Value
       
        Tal1 = Mid(Streng, 1, 2)
        Tal2 = Mid(Streng, 3, 2)
        Tal3 = Mid(Streng, 5, 2)
        Tal4 = Mid(Streng, 7, 2)

        Streng = Tal1 & " " & Tal2 & " " & Tal3 & " " & Tal4
    End If
Next

Cells(AktivRaekke, AktivKolonne).Select

End Sub

slitter = splitter :-)

Der er en meget lettere funktion i Excel:

=TEKST(A1;"00 00 00 00")

Den konverterer tallet i A1 til tekst efter formatet "00 00 00 00"

Måske kan den bruges direkte i Word, ellers kan du formatere det udtræk fra Excel du bruger i Word

Dog kræver det at der er 8 cifre i tallet, ellers skal der laves lidt flere krumspring

Der er 8 tal.

rym: Macro'en virker ikke - formentligt fordi numrerne er formatteret til standard.

ldanielsen->Tester lige..

Forskellen på min makro og så funktionen er at min makro konverterer tallene i samme kolonne, hvorimod Excels indbyggede funktion kræver at der arbejdes med en ny kolonne - det er nok smag og behag :-)

Hvad er det ved min makro der ikke virker?

Mine numre er også formatteret som Standard

rvm - ved jeg ikke - men jeg er enig i, at det er samme resultat. Tak for hjælpen begge to - ldanielsen: smid lige et svar - så deler i point.

ldanielsen - smid et svar her:
http://www.eksperten.dk/spm/544999

er gjort.

Jeg skulle nu mene at funktionen kan bruges direkte i Word. Højreklik på feltet og vælg "Vis feltkoder", så skulle der være mulighed for at lave det.

Nu har jeg arbejdet videre i Word og efter en del fosøg har det faktiskt vist sig at det kan lade sig gøre :-)

Her er koden, der skal stå i flettefeltet

{Mergefield Tlf \# "00 00 00 00"}