EXCEL中怎么删除指定单元格上的图片?
发布网友
共2个回答
热心网友
运行以下宏程序，可以删除姓氏为"赵钱孙李"的人名对应的图片，你可以根据实际需要自行修改姓氏：
Sub 删除特定图片()姓氏清单 = "赵钱孙李"
For Each Shp In Shapes
If InStr(姓氏清单, Shp.TopLeftCell.Offset(, 1)) Then Shp.Delete
Next
End Sub
追问这个宏不用规定列吗？如果A、B列都有图片，C列是姓氏，如果姓氏=’赵钱孙李‘，删除A列，姓氏=’周吴郑王‘，删除B列，宏要怎么修改？
追答 Sub 删除特定图片()
姓氏清单A = "赵钱孙李"
姓氏清单B = "周吴郑王"
For Each Shp In Shapes
列 = Shp.TopLeftCell.Column
If 列 = 1 Then
If InStr(姓氏清单A, Left(Cells(Shp.TopLeftCell.Row, 3), 1)) Then Shp.Delete
End If
If 列 = 2 Then
If InStr(姓氏清单B, Left(Cells(Shp.TopLeftCell.Row, 3), 1)) Then Shp.Delete
End If
Next
End Sub
热心网友
方法一：用剪切粘贴的方式。剪切以后，粘贴到其他表格即可。但是不够彻底。
方法二：如图所示，右键图片，选择“设置图片格式”--“大小属性”--“属性”--“大小和位置随单元格而变”。按照这样的方式设置好以后，再删除单元格，图片也会随之被删除。
