如何运用WORD的VBA，在光标所在位置插入印章

作者：绿色风分类：时间：2022-08-18 浏览：240

楼主 xmyjk	Q:如何在Word里面插入图片格式的公章，有什么方法设置成运行程序之类的就可以盖上去，而不用每次调整大小和版式。 A:代码如下 Sub 宏1() Set sp = Selection.InlineShapes.AddPicture(FileName:=ActiveDocument.Path & "\章.gif", SaveWithDocument:=True) '从该word所在文件夹中导入章.gif为嵌入式图形 With sp Set sp = .ConvertToShape '转化为浮动式图片 .Height = 113.4 '设置图片高度 .Width = 113.4 '设置图片宽度 .Left = Selection.Information(5) - .Width '设置图片左边距,Selection.Information(5)为当前光标距页面左边缘距离 .Top = Selection.Information(6) - .Height / 4 '设置图片上边距，,Selection.Information(5)为当前光标距页面上边缘距离 End With End Sub 11.zip
2楼 windimi007	此时不坐沙发，更待何时？？？？？？？妃公v5******！
3楼水星钓鱼	玄月WORD也这么精通啊，学习了。

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，经与ExcelTip.Net站长Apolloh商议并征得其同意，现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，供有需要的人士查询使用，也慰缅曾经的论坛时代。所示各个帖子的原作者如对版权有异议，可与本人沟通提出，或于本站点留言，我们会尽快处理。在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表