Sub 修改图片大小 SelectionShapeRangeLockAspectRatio = msoFalse SelectionShapeRangeHeight = 87874015748 SelectionShapeRangeWidth = 87874015748 SelectionShapeRangeIncrementLeft 075 SelectionSha

这段 VBA 代码可以用于修改选定图片的大小和位置。首先，将图片的“锁定纵横比”属性设置为 msoFalse，以允许修改高度和宽度的比例。然后，将高度和宽度设置为特定值（这里是 87.874015748，以毫米为单位），以缩小图片。最后，使用 IncrementLeft 和 IncrementTop 方法将图片向右和向下移动一个固定的距离（这里是 0.75 毫米），以使其在文档中居中。