这应该是vba的代码，word的vba的吧。
逐行翻译没必要，有些是定义语句，有些是规定的结构性开始结构性结束语句。
主要是2个循环，循环遍历图形和图片，如果超宽了，就设置宽高到那个大小。
判断条件，一个是大于一个是等于。
Shape 对象代表文档中的图形对象，InlineShape 代表文档中的嵌入式图形对象。
Shape 与 InlineShape 对象在文档中分别属于 Shapes 集合与 InlineShapes 集合。
两个方法的不同在于插入的位置的不同：
InlineShapes 只能指定 Range 进行插入。这与文档中的文字插入是相同的。
Shapes 插入的图片可以任意定位。
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024