.doc to .txt batch converter?

  • Thread starter Thread starter casioculture
  • Start date Start date
C

casioculture

Anyone knows a .doc to .txt batch converter? (i.e from MS Word format
to plain text)

Thanks
 
Anyone knows a .doc to .txt batch converter? (i.e from MS Word format
to plain text)
Click to expand...

You can do this with a macro. (Ask within a Winword related group for
details.) Here is a suggestion I use (for *.rtf - but that doesn't
matter...):

Sub SaveAsTxt()
Dim sFName As String
sFName = ActiveDocument.FullName
If ActiveDocument.SaveFormat = wdFormatDocument And _
Right(sFName, 4) = ".doc" Then
ActiveDocument.SaveAs FileName:=Left(sFName, Len(sFName) - 4) & _
".txt", FileFormat:=wdFormatText
End If
ActiveDocument.Close
If Application.Documents.Count = 0 Then
Application.Quit
End If
End Sub

Using the command line parameter /m for Winword you could either create
a 'Shell\Convert' shortcut for *.doc files (inside the registry):

"[PTW]\winword.exe" /mSaveAsTxt "%1"

or make a touch-to-Txt batch:

for %%i in (*.doc) do [PTW]\winword.exe /mSaveAsTxt "%%i"

Replace [PTW] with the path to your Winword executable in both cases. ;-)

BeAr
 
casioculture said:
Anyone knows a .doc to .txt batch converter? (i.e from MS Word format
to plain text)

Thanks
Click to expand...

MS Word. Save as. .txt . Of course you lose your formatting `cos it`s no
longer a RTF doc (Rich Text Format). best wishes..J
 
Back
Top