Set placePdfOptions = CreateObject("Indesign.pdfPlacePreferences")

I think this line should be

Set placePdfOptions = myIndesign.pdfPlacePreferences