VBA在EXCEL寻找是包含图片的图片并选定

以下是使用VBA在Excel中寻找包含图片的图片并选定的示例代码：

Sub SelectPicturesWithImages() Dim sh As Shape For Each sh In ActiveSheet.Shapes If sh.Type = msoPicture And sh.Fill.Type = msoFillPicture Then sh.Select End If Next sh End Sub

这段代码遍历活动工作表上的所有形状。如果形状是图片类型并且填充类型是图片，则将其选定。如果您只想选定特定区域中的图片，请修改代码以仅遍历该区域内的形状。