Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Batch Conversion Wizard in 2007?
Word 2003 had a nifty batch conversion wizard for converting a whole bunch of
docs to HTML. Is there something comparable in Word 2007? I know that you can use "Save As" to save a single document, but I have a whole bunch to be converted. |
#2
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Batch Conversion Wizard in 2007?
You could use a macro
Sub SaveAllAsHTML() Dim strFileName As String Dim strDocName As String Dim strPath As String Dim oDoc As Document Dim fDialog As FileDialog Set fDialog = Application.FileDialog(msoFileDialogFolderPicker) With fDialog .Title = "Select folder and click OK" .AllowMultiSelect = False .InitialView = msoFileDialogViewList If .Show -1 Then MsgBox "Cancelled By User", , "List Folder Contents" Exit Sub End If strPath = fDialog.SelectedItems.Item(1) If Right(strPath, 1) "\" Then strPath = strPath + "\" End With If Documents.Count 0 Then Documents.Close SaveChanges:=wdPromptToSaveChanges End If If Left(strPath, 1) = Chr(34) Then strPath = Mid(strPath, 2, Len(strPath) - 2) End If strFileName = Dir$(strPath & "*.doc") While Len(strFileName) 0 Set oDoc = Documents.Open(strPath & strFileName) strDocName = ActiveDocument.FullName intPos = InStrRev(strDocName, ".") strDocName = Left(strDocName, intPos - 1) strDocName = strDocName & ".htm" oDoc.SaveAs FileName:=strDocName, _ FileFormat:=wdFormatHTML oDoc.Close SaveChanges:=wdDoNotSaveChanges strFileName = Dir$() Wend End Sub http://www.gmayor.com/installing_macro.htm -- Graham Mayor - Word MVP My web site www.gmayor.com Word MVP web site http://word.mvps.org Joyce wrote: Word 2003 had a nifty batch conversion wizard for converting a whole bunch of docs to HTML. Is there something comparable in Word 2007? I know that you can use "Save As" to save a single document, but I have a whole bunch to be converted. |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
batch conversion wizard | New Users | |||
batch conversion wizard in word 2007 | Microsoft Word Help | |||
batch conversion wizard feature | Microsoft Word Help | |||
batch conversion wizard | New Users | |||
Batch Conversion Wizard | Microsoft Word Help |