Læse og skrive til tekstfil fra makro

Sub Test()
'
' Test Macro
' Macro recorded 27-01-2004 by Ole R
'
    Selection.WholeStory
    ActiveDocument.SaveAs FileName:="test.txt", FileFormat:=wdFormatText, _
        LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _
        :="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _
        SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _
        False, Encoding:=1252, InsertLineBreaks:=False, AllowSubstitutions:=False _
        , LineEnding:=wdCRLF
End Sub

her blev der skrevet til filen test.

Her kommer så hvor filen bliver læst

Sub Test_read()
'
' Test_read Macro
' Macro recorded 27-01-2004 by Ole R
'
    Documents.Open FileName:="test.txt", ConfirmConversions:=False, ReadOnly:= _
        False, AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:= _
        "", Revert:=False, WritePasswordDocument:="", WritePasswordTemplate:="", _
        Format:=wdOpenFormatAuto, XMLTransform:="", Encoding:=1252
End Sub

Ahhh. Jeg var måske ikke præcis nok i min angivelse. Jeg vil ikke bare gemme dokumentet som tekstfil. Jeg vil kunne gemme nogle data, som jeg kan hente ind igen næste gang dokumentet åbnes.

Noget i denne stil du leder efter?

http://www.erlandsendata.no/english/vba/fileaccess/sequential.php

Lige akkurat! :-)

Okay, okay, så manglede der lige lidt, helt ok du har fået en løsning og det er det vigtigste.