Тусклый w как новое Word.Application
Тусклый doc как Word.Document
filePath = «c:\. \ test.doc»
filePathTxt = «c:\. \ test.txt»
Установите doc = w.Documents.Open (filePath)
FileName doc.SaveAs: =filePathTxt, FileFormat: =wdFormatText, _
LockComments: =False, пароль: = "", AddToRecentFiles: =True, _ WritePassword
: = "", ReadOnlyRecommended: =False, EmbedTrueTypeFonts: =False, _
SaveNativePictureFormat: =False, SaveFormsData: =False, SaveAsAOCELetter: = _
Ложно, шифрующ: =1252, InsertLineBreaks: =False, AllowSubstitutions: _ =False
, LineEnding: =wdCRLF
|