![如何在 Microsoft Word 2007 中對圖片套用常規尺寸](https://rvso.com/image/1311537/%E5%A6%82%E4%BD%95%E5%9C%A8%20Microsoft%20Word%202007%20%E4%B8%AD%E5%B0%8D%E5%9C%96%E7%89%87%E5%A5%97%E7%94%A8%E5%B8%B8%E8%A6%8F%E5%B0%BA%E5%AF%B8.png)
是否可以在編輯 Microsoft Word 2007 中的所有圖片時對其套用特定尺寸。如果是的話,這該怎麼辦呢。謝謝
答案1
這是取自此的很棒的宏來源。我已將其包含在此處,以防引用的連結過期。您基本上必須指定一個快捷方式並儲存此宏,然後選擇全部文件中的圖像(透過前往樣式並選擇您所指派的圖像樣式)。
Sub AllPictSize()
Dim PecentSize As Integer
Dim oIshp As InlineShape
Dim oshp As Shape
PercentSize = InputBox("Enter percent of full size", "Resize Picture", 75)
For Each oIshp In ActiveDocument.InlineShapes
With oIshp
.ScaleHeight = PercentSize
.ScaleWidth = PercentSize
End With
Next oIshp
For Each oshp In ActiveDocument.Shapes
With oshp
.ScaleHeight Factor:=(PercentSize / 100), _
RelativeToOriginalSize:=msoCTrue
.ScaleWidth Factor:=(PercentSize / 100), _
RelativeToOriginalSize:=msoCTrue
End With
Next oshp
End Sub
在選定的影像上執行宏,並指定百分比最大的影像在所選影像中。預設值為 75%,這表示所有影像的大小都將調整為最大影像的 75%。
筆記:所有選定的項目必須是圖像才能使該巨集起作用,因為Word只能對圖像物件執行調整大小操作。如果圖像大小調整不正確,請檢查您的樣式並使所有圖像與其自己獨特的樣式保持一致。