Question

Excel宏代码中怎样表示任意多个字符，就像*号代表任意多个一样

我想删除表格中的图片对象ActiveSheet.Shapes("picture 6").Select 就是那个6怎样用任意个字符表示。表中有其他两个对象不能删除，所以只能用picture 后接任意个字符来表示了

Answer 1

直接ActiveSheet.Shapes

删除所有就可以了！

追问

没看名白你复制的代码是什么意思。表中有其他两个对象不能删除的，只删除picture对象！！！

追答

那就遍历，满足条件就删，不满足就不删就OK了
for each

next

追问

求具体代码

Answer 2

亲，试一下判断
for each shp in activesheet.shapes
if shp.name<> "picture 6" and shp.name like "picture *" then
...
endif
next

追问

这样么？无效，什么对象都没有删除

追答

Sorry，找到原因了，大小写的问题：
"Picture *"