VBA Put a button in the background on a PDF

[taisen00]

Hello,

following discussion on this post:

VBA to place images inside a PDF???

Hey guys, Is it possible to use VBA to place images inside an existing PDF with accuracy and precision? Even better, could VBA be used to place said images into an INDD file? If not, is there a different scripting language that is suited for such a task? I’ve been creating print-advertising...

www.mrexcel.com

The code allows me to add a button with an image. But I would like to be able to use the dynamic fields of the PDF.
Off the button is in the foreground.

            'Add button with image to this page
            Set pageField = jso.addField("button" & page + 1, "button", page, fieldRect)
            pageField.buttonImportIcon imageFile
            pageField.buttonPosition = jso.Position.iconOnly
            pageField.ReadOnly = True
            pageField.flattenButton

I was thinking of adding : pageField.flattenButton
It does not work. Can someone help me ?

Sorry for my English.

 

[ChrisFoster]

'Add button with image to dynamic field
Set pageField = jso.addField("dynamicFieldName", "button", 0, fieldRect)
pageField.buttonImportIcon imageFile
pageField.buttonPosition = jso.Position.iconOnly
pageField.zOrder = 1
pageField.ReadOnly = True
pageField.flattenButton

Replace "dynamicFieldName" with the name of your dynamic field. Setting the "zOrder" property to 1 will ensure that the button is in the foreground.

 

[taisen00]

Hello ChrisFoster,
thank you for your answer.
The code stops at "zOrder".
I don't know why when I said the same thing as in your message..


I'm starting to believe it's not possible.

 

[ChrisFoster]

Hello ChrisFoster,
thank you for your answer.
The code stops at "zOrder".
I don't know why when I said the same thing as in your message..


I'm starting to believe it's not possible.

Hello ChrisFoster,
thank you for your answer.
The code stops at "zOrder".
I don't know why when I said the same thing as in your message..


I'm starting to believe it's not possible.

Are you getting a debug error?

 

[taisen00]

ChrisFoster,

yes, i have getting a debug error.
It says "Runtime error 438: Property or method not handled by this object".

 

[ChrisFoster]

Try

'Add button with image to this page
Set pageField = jso.addField("button" & page + 1, "button", page, fieldRect)
pageField.buttonImportIcon imageFile
pageField.buttonPosition = jso.Position.iconOnly
pageField.ReadOnly = True

'Check if pageField is a button field and set zOrder to -1
If pageField.type = "button" Then
    pageField.zOrder = -1
End If

'Flatten the button
pageField.flattenButton

 

[taisen00]

Thank you for your answers, it makes me happy.

I still get a 438 error on line:

pageField.ZOrder = -1