🚀 go-pugleaf

I am trying to update some scripts that worked fine under 1.5 to 2.0 and I can`t seem to make the following work... 

Private Sub PlacePDF(iPage As Variant, iFile As Variant, xPos As Variant, yPos As Variant, iAngle As Variant) 
myPDFPlacePreferences.PageNumber = iPage 
Set myPDF = myPage.Place(iFile, Array(xPos, yPos)) 
If iAngle = 1 Then 
��������myPDF.Rotate 270, idCenterAnchor 
End If 
If iAngle = 2 Then 
��������myPDF.Rotate 180, idCenterAnchor 
End If 
If iAngle = 3 Then 
��������myPDF.Rotate 90, idCenterAnchor 
End If 
End Sub 

Private Sub PlaceEPS(iFile As Variant, xPos As Variant, yPos As Variant, iAngle As Variant) 
Set myImage = myPage.Place(iFile, Array(xPos, yPos)) 
If iAngle = 1 Then 
��������myImage.Rotate 270, idCenterAnchor 
End If 
If iAngle = 2 Then 
��������myImage.Rotate 180, idCenterAnchor 
End If 
If iAngle = 3 Then 
��������myImage.Rotate 90, idCenterAnchor 
End If 
End Sub 

The two rouintes import a PDF or an EPS, place it at a certain x y position and then (if necessary) rotate the placed image.  The rotate fails.  Message "Object does not support this property or method" The reference claims it does. It used to work - under 1.5.  Can someone please help me out? 

Gary