Sub BatchConvertDocToPDF() Dim sourceFolder As String Dim targetFolder As String Dim fso As Object Dim folder As Object Dim file As Object Dim doc As
