格式化一个图片对象

我有一个对象，我可以使用下面的代码来select和移动：

ActiveWorkbook.Worksheets("Sheet1").Shapes.Range(Array("test")).Select 

随后是需要执行的任何方法。 我现在试图格式化这个对象，使它没有填充和没有行，但不知道如何做到这一点。 我曾尝试录制macros并在线search，但无法find适用于此对象的任何内容。

Answer 1

如果你正在使用一个单独的形状，我没有理由使用Shapes.Range(Array("test")) ，试着用单独的形状来工作，并参考文档中的可用属性，比如.Fill ：

形状对象参考：

http://msdn.microsoft.com/en-us/library/office/ff847149(v=office.14).aspx

形状。 .Fill参考：

http://msdn.microsoft.com/en-us/library/office/ff838181(v=office.14).aspx

等等

 Sub Test() Dim shp as Shape Set shp = ActiveWorkbook.Worksheets("Sheet1").Shapes("test") shp.Fill.Visible = msoFalse 'etc... End Sub 

Answer 2

在一百万次不同的尝试后发现它！

 With ActiveWorkbook.Worksheets("Sheet1").Shapes.Range(Array("test")) .Fill.Visible = msoFalse .Line.Visible = msoFalse End With