☰

如何在 Microsoft Word 2007 中對圖片套用常規尺寸

tag-icon • tag-icon microsoft-word images microsoft-word-2007
如何在 Microsoft Word 2007 中對圖片套用常規尺寸

是否可以在編輯 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只能對圖像物件執行調整大小操作。如果圖像大小調整不正確，請檢查您的樣式並使所有圖像與其自己獨特的樣式保持一致。

相關內容