本文由日文译成中文。

这是 Excel VBA 中设置工作表中图像(自动成型)的顶部和左侧位置的记录。

顶部位置使用 “Top” 属性,左侧位置使用 “Left” 属性。

< Sponsored Links >





示例

以点为单位设定位置

将图像设置为顶部 50 点,左侧 50 点。

Sub test()
     Dim shp As Shape
     Set shp = ActiveSheet.Shapes(1)
 
     With shp
         .Top = 50
         .Left = 50
     End With
 End Sub
画像位置
画像位置

 

适合单元格

将顶部和左侧位置与单元格 B2 的顶部和左侧位置对齐。

Sub test()
     Dim shp As Shape
     Set shp = ActiveSheet.Shapes(1)
 
     With shp
         .Top = Range("B2").Top
         .Left = Range("B2").Left
     End With
 End Sub
画像位置
画像位置

< Sponsored Links >