尝试使用VBA调整Adobe Form中的文本大小

问题描述

当前正在使用VBA填写Adobe表单。文本大小设置为9，但是在某些情况下，文本会超出表单字段的边界。

我想自动包装文本并调整其大小以适合该字段。到目前为止，我的代码是：

Current_Field = Cells(y,1).Value           
Other_Field = Cells(y,2).Value

While Current_Field <> ""
    Set xf = jso.getField(Current_Field)    
    xf.textcolor = jso.Color.blue
    xf.textsize = 9
    xf.Value = Other_Field                  
    y = y + 1
    Current_Field = Cells(y,1).Value
    Other_Field = Cells(y,2).Value
Wend

任何帮助将不胜感激。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）