If you want a pdf, why are you saving with .docx or .doc extensions?

The following line is saving as .doc:
ActiveDocument.SaveAs FileName:=strDrive & "" & fisword & ".doc", FileFormat:=wdFormatDocument