在工作表中更改图像大小

我正在寻找更改放置在工作表上的图像“红色检查”的高度,但这会导致错误。 任何想法这里有什么不对?

Sheet1.Shapes("red_check").ShapeRange.Height = 0 

当你这样做时:

  Shapes("red_check") 

这将返回一个Shape对象( 在MSDN上检出其成员 )。 因此,您可以简单地执行以下操作:

 Sheet1.Shapes("red_check").Height = 0 

为了设置你的形状的Height属性。 你可以同样设置Width