excel如何识别有图片的单元格？

问：前不久有网友问我如何识别有图片的单元格，并在工作表的某一列输入对应的文字，而有些单元格是空的。如所示，工作表1的B列有图片的单元格输入“有图片”，无图片的单元格输入“无图片”，效果显示在G列.

答：以下代码可以满足我们的要求：

子决策描述()

将单元格调暗为范围

将单元格调暗为长

申请。屏幕更新=假

设置查阅列中的单元格数。

lngCells=3

对于范围内的每个单元(“B2:B”单元)

如果图片存在(表格1，单元格)，则

手机。Value=“有一张图片”。

其他

手机。Value=“无图片”。

如果…就会结束

下一个单元格

申请。屏幕更新=真

末端接头

函数PicIfExists(作为工作表，作为范围)作为布尔值

将形状变暗

每周一次。形状

如果shp。地址=rng。地址然后

图片存在=真

退出

如果…就会结束

下一个shp

结束功能

在用户自定义函数PicIfExists中，Shape对象的TopLeftCell属性用于获取图片所在单元格的地址，然后将该地址与单元格进行比较，以确定该单元格是否包含图片。