如何查找PDF表单字段类型

时间:2017-04-25 06:04:52

标签: excel-vba pdf-form vba excel

似乎缺乏adobe属性/方法的文档。我有Adobe SDK API,但缺少任何细节。

我的代码是将Excel文档中的数据写入PDF表单。它遍历所有字段并将数据写入PDF表单。如果PDF表单字段类型是数字,则抛出并发生错误。

我需要测试PDF表单字段是否为数字。如果是,我会将该字段名称添加到集合中,并在过程完成后显示。

我查找了GetField属性但找不到任何文档。类似的东西:

IF jso.getfield(strField).type=numeric
colFail.Add=strField

1 个答案:

答案 0 :(得分:0)

审查Peh提供的链接(谢谢Peh);这就是我处理它的方式:

           'Fill the form fields.
            For r = 20 To 149
                strField = ToPDFsh.Cells(r, 3).Value
                strFieldVal = ToPDFsh.Cells(r, 4).Value
                    If strFieldVal = "" Then GoTo BlankVal

                objJSO.GetField(strField).Value = strFieldVal

                On Error GoTo ErrHandler

BlankVal:                 下一个r`

等等等等等等等等。

ErrHandler:
e = e + 1
If e > 7 Then
    MsgBox "Something Bad happend... :(" & vbNewLine & "Form not filled", vbCritical, "Failed"
    GoTo ErrHandlerExit
End If

colFail.Add strField
Resume Next
Exit Sub

ErrHandlerExit:     '关闭表单而不保存更改。     objAcroAVDoc.Close True

'Close the Acrobat application.
objAcroApp.Exit

'Release the objects and exit.
Set objJSO = Nothing
Set objAcroPDDoc = Nothing
Set objAcroAVDoc = Nothing
Set objAcroApp = Nothing

'Enable the screen.
Application.ScreenUpdating = True
Exit Sub

End Sub