Convert multiple word files into pdf

[bruce71101]

Hi,

Is there a way to convert Convert multiple word files into pdf files using excel macro?
I found a way to convert multiple excel file to pdf,(see the below example) can we do the same for word file?

Sub Macro1()
Dim wsh As Worksheet, vWshs, vWshName

vWshs = Array("Sheet1", "Sheet3", "Sheet4")
With ActiveWorkbook
    For Each vWshName In vWshs
        .Worksheets(vWshName).ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
            "C:\Tmp\" & vWshName, Quality:=xlQualityStandard, _
            IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
    Next vWshName
End With
End Sub

[nathansav]

Probably best to be in a word forum, but i'd record a macro saving a word document as a PDF and then disect that code.