Gemme i tekst format, uden 'skilletegn'

Gem som Formateret tekst(mellemrumssepareret) (*.Prn)

Eller som

Unicode-tekst (*.txt)

eller
Tekst(MS-DOS)(*.txt)

Tak for dit svar, men det er ikek løsningen. Når nan gør det, kommer der TAB tegn med.

Er der virkelig ikke nogle der har et svar på dette ?

Hvad ønsker du så som adskiller ?
Noget vil du vel ha'.

Der kommer ingen TAB-tegn med ved kabbaks første forslag
Formateret tekst(mellemrumssepareret) (*.Prn)
Der bliver bare fyldt ud med mellemrum.

Hvis du kun ønsker et mellemrum mellem hver celle kan du bruge nedenstående makro
Den exporterer alle sammenhængende celle i det område du står i.
Med små modifikationer kan den også exportere et markeret område


Sub ExportSpaceCurrentregion()
Dim sFilNavn As String
sFilNavn = ActiveWorkbook.ActiveSheet.Name & ".txt"
sFilNavn = Application.GetSaveAsFilename(InitialFileName:=sFilNavn, fileFilter:="Text Files (*.txt), *.txt")
EksportAsTXT_DK sFilNavn, Selection.CurrentRegion
End Sub


Sub EksportAsTXT_DK(strFileName As String, rngOmr As Range)
Const Delim    As String = " "  'afgrænser (delimiter)
Dim y          As Long          'tæller
Dim x          As Long          'tæller
Dim strTemp    As String        'streng til de enkelte rækker
Dim lRows      As Long          'antal rækker
Dim lCols      As Long          'antal kolonner
Dim lFno      As Long          'fil nummer

lFno = FreeFile
lRows = rngOmr.Rows.Count
lCols = rngOmr.Columns.Count
Open strFileName For Output As #lFno

For x = 1 To lRows
    strTemp = ""
    For y = 1 To lCols
        strTemp = strTemp & rngOmr(x, y).Text
        If y < lCols Then
            strTemp = strTemp & Delim
        Else
            Print #lFno, strTemp
        End If
    Next

Next
Close #lFno

End Sub

OK, Den vil jeg lige prøve.
Nej jeg vil ingen 'skilletegn' have.
Tak for svaret.
Smid et svar, så giver jeg points.

bak !

Kan du kort forklare hvorden jeg bruger din basic kode i excel ?
Det er nyt for mig.

lukker