Batch Print .doc to .prn VBA

I routinely need to print .doc files to .prn (which I then rename as .txt files) and I'm looking for a way to batch print.

For the types of files I work on, it's necessary to print to .prn and rename as .txt as printing to .txt or saving directly to .txt messes up my formatting.

Does anyone have a VBA suggestion?

Thank you!

I am not familiar with "printing" a DOC file to PRN. Is that the same as saving a DOC file to the PRN format ?

Also ... does the following resource help in part, with the process ?
https://www.dell.com/support/kbdoc/e...r-applications

Quote:

---

Originally Posted by Logit

I am not familiar with "printing" a DOC file to PRN. Is that the same as saving a DOC file to the PRN format ?

Also ... does the following resource help in part, with the process ?
https://www.dell.com/support/kbdoc/e...r-applications

---

Printing to .prn is different than saving a .doc to .prn. When you print to .prn you use the generic/text printer which strips some formatting from the .doc, but leaves others. Your result will be different also from saving to .txt.

For a single document, that's as simple as:

Code:

---

Sub Demo()
With ActiveDocument
  .PrintOut PrintToFile:=True, OutputFileName:=Split(.FullName, ".doc")(0) & ".txt"
End With
End Sub

---

You need to clarify, though, how the members of a batch print would be identified (e.g. all open documents, all documents in a selected/specified folder, documents selected from a pick list, other).

https://www.gmayor.com/Batch_Print.htm will allow you to select the generic/text printer and 'print' to a folder of your choice.

Thank you!