我有一個幻燈片,每張幻燈片上都有一個連結圖像。我必須定期更新這些圖像,但是當我這樣做時,每個連結圖像的大小格式都會發生變化。有人可以告訴我,在不使用巨集的情況下,有一種簡單的方法可以同時格式化每張投影片上所有這些連結圖像的大小(每個連結圖像的大小都相同)嗎?
答案1
這是我使用的巨集:
Dim w As Double
Dim h As Double
Dim l As Double
Dim t As Double
Sub StoreDetails()
With ActiveWindow.Selection.ShapeRange(1)
w = .Width
h = .Height
l = .Left
t = .Top
End With
End Sub
Sub OutputDetails()
With ActiveWindow.Selection.ShapeRange(1)
.Width = w
.Height = h
.Left = l
.Top = t
End With
End Sub
它正確配置了我的圖像“高度”和“對齊方式”,但寬度沒有獲得正確的值。有人能告訴我為什麼嗎?