發新話題
打印

圖片巨集如何改為單張執行

圖片巨集如何改為單張執行

請問各位大大~如何改為單張執行

Sub Macro()
Mywidth = 4.13
Myheigth = 5.48
For Each iShape In ActiveDocument.InlineShapes
iShape.Height = 28.345 * Myheigth
iShape.Width = 28.345 * Mywidth
Next iShape
End Sub

TOP

發新話題