原创力文档- 1、本文档内容版权归属内容提供方，所产生的收益全部归内容提供方所有。如果您对本文有版权争议，可选择认领，认领后既往收益都归您。。
- 2、本文档由用户上传，本站不保证质量和数量令人满意，可能有诸多瑕疵，付费之前，请仔细先通过免费阅读内容等途径辨别内容交易风险。如存在严重挂羊头卖狗肉之情形，可联系本站下载客服投诉处理。
- 3、文档侵权举报电话：400-050-0827(电话支持时间：9:00-18:30)。
- 4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
- 5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传，每下载1次， 网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
图片方向图片对齐关闭屏幕更新恢复屏幕更新图片大小关闭屏幕更新祭楷倨潲灭尽单位为厘米如果输入为则图片保持原始纵横比宽度根据输入的高度数值自动调整吠敬请输入图片宽度祭杩污浯瑰单位为厘米如果输入为则图片保持原始纵横比高度根据输入的宽度数值自动调整吠敬请输入图片高度调整嵌入式图形调整浮动式图形恢复屏幕更新浮于文字上方关闭屏幕更新调整嵌入图形为浮于文字上方并旋转度去除行四周形紧密形改为嵌入形浮于文字上方衬于下方调整其它图形为浮于文字上方并旋转度去除行四周形紧密形改为嵌入形浮于文字上方衬于下方恢复屏幕更新浮
Sub 图片方向() .....................................................
Sub 图片对齐()
Application.ScreenUpdating = False 关闭屏幕更新
Dim n
On Error Resume Next
ActiveDocument.Shapes(n).Select
orizontalPosition = _
wdRelativeHorizontalPositionMargin
wdRelativeVerticalP
文档评论（0）