when you create an excel object no work book is opened, you have to open an existing workbook or add a new workbook to the workbooks collection, within your code

for new workbook
vb Code:
  1. set objbook = objexcel.workbooks.add
  2. objbook.SaveAs dirPath & "\" & fileBaseName & ".pdf", ppSaveAsPDF
of course i can not understand why you would want to save an empty workbook, so i would assume you reaaly want to open a workbook first