问使用VBA新建PDF文档，并且向里面插入一段文字？

我引用了acrobat 10.0 lib。但是这些代码使用不了。求大佬帮助

Sub PDFDD()

Dim AcroApp As Acrobat.AcroApp

Dim pdDoc As Acrobat.AcroPDDoc

Dim PDPage As Acrobat.AcroPDPage

Dim savepath As String

Set pdApp = CreateObject("AcroExch.App")

Set pdDoc = CreateObject("AcroExch.PDDoc")

savepath = "E:\123.pdf"

pdDoc.Create

Set PDPage = pdDoc.CreatePage(0, 612, 792)

PDPage.content.AddText 10, 10, "Hello, World!"

pdDoc.Save (savepath)

pdDoc.Close

AcroApp.Exit

Set PDPage = Nothing

Set pdDoc = Nothing

Set AcroApp = Nothing

End Sub