Excel VBA: 选择单元格范围内的图片

{"title":"Excel VBA: 选择单元格范围内的图片","description":"本指南将向您展示如何使用 VBA 代码选择 Excel 工作表中特定单元格范围内的所有图片。您还可以使用此代码来进一步操作这些图片，例如修改属性或删除它们。","keywords":"Excel VBA, 选择图片, 图片操作, Excel 图像, VBA 代码, 单元格范围, 工作表, 图片属性, 删除图片","content":"要选择单元格B2:B4的图片，您可以使用以下VBA代码：\n\nvb\nSub SelectPictures()\n Dim rng As Range\n Dim shp As Shape\n \n '选择工作表中的单元格B2:B4\n Set rng = ThisWorkbook.Worksheets("Sheet1").Range("B2:B4")\n \n '循环遍历选定的单元格\n For Each cell In rng\n '检查单元格是否包含图片\n If cell.HasPicture Then\n '选择图片\n Set shp = cell.ShapeRange.Item(1)\n '对图片执行操作，例如修改属性或删除\n '...\n End If\n Next cell\nEnd Sub\n\n\n请注意，此代码将在名为"Sheet1"的工作表上执行操作。如果要在其他工作表上执行，请相应地更改代码中的工作表名称。在'对图片执行操作，例如修改属性或删除的注释下，您可以添加任何您想要执行的操作，例如修改图片属性或删除图片等。"}