Schemerig w als Nieuwe Word.Application
Schemerig doc. als Word.Document
filePath = „c:\. \ test.doc“
filePathTxt = „c:\. \ test.txt“
Vastgesteld doc. = w.Documents.Open (filePath)
doc.SaveAs FileName: =filePathTxt, FileFormat: =wdFormatText, _
LockComments: =False, Wachtwoord: = "", AddToRecentFiles: =True, WritePassword _
: = "", ReadOnlyRecommended: =False, EmbedTrueTypeFonts: =False, _
SaveNativePictureFormat: =False, SaveFormsData: =False, SaveAsAOCELetter: = _
Vals, Coderend: =1252, InsertLineBreaks: =False, AllowSubstitutions: =False _
, LineEnding: =wdCRLF
|