Home |
Search |
Today's Posts |
#4
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
converting TO .docx
On Fri, 26 Mar 2010 18:31:07 +1000, "Doug Robbins - Word MVP"
wrote: A macro containing the following code will convert all of the files in the folder C:\Test Wow! Thanks Doug. Once I got rid of the carriage return after the & it worked like a charm. -- Bob http://www.kanyak.com Modify the line of code that contains that folder name to suit where you have the documents located. Dim myFile As String Dim PathToUse As String Dim myDoc As Document PathToUse = "C:\Test\" Documents.Close SaveChanges:=wdPromptToSaveChanges myFile = Dir$(PathToUse & "*.rtf") While myFile "" 'Open document Set myDoc = Documents.Open(PathToUse & myFile) myDoc.SaveAs PathToUse & Left(myDoc.Name, InStr(myDoc.Name, ".")) & "docx", wdFormatDocumentDefault myDoc.Close 'Next file in folder myFile = Dir$() Wend |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Converting FROM .tiff TO .doc or .docx | Microsoft Word Help | |||
Converting equations from docx to doc | Microsoft Word Help | |||
converting .docx to .doc | Microsoft Word Help | |||
Converting docx into doc | New Users | |||
Converting .Docx File Into .Doc | Microsoft Word Help |