如何通过VBA设置Acrobat中PDF表单域的字体大小及颜色属性

你遇到报错的核心原因是混用了Office表单对象的属性名和Acrobat JS对象模型的规则：

• Acrobat JS的Field对象不存在FontSize、Color这两个属性，属性名不匹配直接触发“对象不支持该属性或方法”报错
• 颜色属性不支持传入"red"这类字符串值，必须使用Acrobat规定的固定格式数组传参

Dim oAVDoc As Object, oPDDoc As Object
Dim oJso As Object, oFld As Object
Dim textColor(2) As Single

' 初始化Acrobat对象
Set oAVDoc = CreateObject("AcroExch.AVDoc")
oAVDoc.Open "C:\Temp\test.pdf", ""
Set oPDDoc = oAVDoc.GetPDDoc
Set oJso = oPDDoc.GetJSObject
Set oFld = oJso.getField("TestFieldName")

' 字段赋值（原有逻辑保持不变）
oFld.Value = "This is the new value."

' 设置字体大小：对应属性为textSize
oFld.textSize = 14

' 设置文本颜色：对应属性为textColor，传入RGB数组（通道值范围0-1，为0-255色值除以255的结果）
' 以下为红色配置
textColor(0) = 1 ' 红通道
textColor(1) = 0 ' 绿通道
textColor(2) = 0 ' 蓝通道
oFld.textColor = textColor

' 可选：保存修改后的文档
oPDDoc.Save &H1, "C:\Temp\test_modified.pdf"

' 释放资源
oAVDoc.Close True
Set oFld = Nothing
Set oJso = Nothing
Set oPDDoc = Nothing
Set oAVDoc = Nothing

• 字段边框颜色：strokeColor，传参格式和textColor一致
• 字段背景填充色：fillColor，传参格式和textColor一致
• 文本字体：textFont，传入字体对应的PostScript名称，例如Arial字体对应传值"ArialMT"
• 文本对齐方式：alignment，传值0为左对齐、1为居中、2为右对齐

• 如果表单字段开启了富文本格式选项，上述直接设置属性的方式不会生效，需要针对richValue属性逐段配置文本样式
• 部分版本Acrobat在设置属性后不会即时刷新界面，保存文档后重新打开即可看到修改效果
• 颜色数组的三个通道值必须是0到1之间的单精度浮点数，直接传0-255的整数会导致颜色显示异常

内容的提问来源于stack exchange，提问作者John Osmond