如何在word中二维码图片下面批量增加相同的文字？

使用VBA，下面给个流程和代码，你参考下

• 新建word

• “插入”|“图片”，选择多个图片插入

• “Alt+F11”

• 粘贴以下代码，关闭VBA

• 选中第一个图片

• Alt+F8，选择运行

• 输入需要添加的文字

• 输入需要增加的个数（最好与图片数量相同）

至此已经增加好了


Sub 批量添加文本()    Dim n As String    Dim m As Integer    n = InputBox("输入填写的内容", "输入", "标题")    m = InputBox("输入需要插入数量", "输入", 10)    For i = 1 To m        Call 增加标题(n)    NextEnd Sub Sub 增加标题(iString As String)    Selection.MoveRight Unit:=wdCharacter, Count:=1    Selection.TypeParagraph    Selection.TypeText Text:="标题"    Selection.TypeParagraphEnd Sub
•    

这个很简单，我可以用opencv做写个程序，您只要提供待填写的图片模板和文字(最好在表格里，或者txt文件里也行)，我可以做，比如批量填写获奖证书上的获奖人名字，毕业证书上的学生名字，三千五千张不是问题。