文本框识别

建议在03格式文件中使用此功能,因为在10格式中,文本框可能会出现无法设置默认边框的问题。

在使用文本框识别之前,需要先对Word进行设置:


设置默认文本框快捷键

点击Word菜单中文件--选项,进入Word选项窗口

点击左侧自定义功能区,右侧点击键盘快捷方式自定义,打开自定义键盘窗口

点击左侧文本框工具 | 文本框选项卡,然后点击右侧DrawTextBox2项,在下方指定键盘顺序--按新快捷键窗口中,输入您希望设置的快捷键(这里示范设置成F2键)

快捷键可以自行设置,不一定与图示中相同


设置快速访问工具栏

点击Word菜单中开始选项卡,找到右侧的选择按钮,点击并在选择对象按钮上右击,弹出右键菜单中选择添加到快速访问工具栏

点击Word菜单中文件--选项,进入Word选项窗口

点击左侧快速访问工具栏,右侧找到自定义快速访问工具栏窗口,将选择对象上移至第一位。这样的话,他的快捷键即为Ctrl + 1




设置默认文本框

选择一个文本框,使用AdtpWord工具栏中框内清除可以设置默认文本框为透明色,无边框,框内间距为0的文本框

进行识别的文本框必须设置成这种样式,否则会不能识别


手动画出文本范围

通过按F2(之前设置的快捷键,可调整)将图片需要读取的位置套上文本框,并按Ctrl + 1 或鼠标点击选择工具全部选中,如图:

AdtpWord工具栏中识别文本框文本框调整打勾

文本框调整勾选此项,会令工具按照最合适的大小更改识别文字的大小,使其不会超出显示范围,并且也会自动根据图片底色更改底色

点击识别文字,完成识别


立刻调整文本框

如果有多个文本框中文字大小不一,使用选择工具全部选中,然后点击AdtpWord工具栏中立刻调整,可以将每个文本框的文字调整成统一的合适的大小(即不超出文字能显示的字号最大值)




设置识别快捷键

按下键盘Alt+F8打开宏,点击创建,进入VBA设计器

将以下代码粘贴进设计器中

vb 复制代码
Sub 识别文本()
    Dim addIn As COMAddIn
    Dim automationObject As Object
    Set addIn = Application.COMAddIns("Adtp_WordAddIn")
    Set automationObject = addIn.Object
    automationObject.StartOCR ("")
End Sub

打开Word---文件---选项---自定义功能区---键盘快捷方式,点击自定义按钮,设置一个自己的快捷键,如下图

上一个
文本识别
下一个
自定义识别源
最近修改: 2025-04-13Powered by