excel如何识别带有图片的单元格？
发布时间：2023-04-21 00:16:33
标签：excel常用函数,excel常见问题,excel技巧,Excel教程
Q：前不久有网友问我，在工作表的一列中，有些单元格放置有图片，有些单元格为空，如何识别带有图片的单元格并输入相应的文字？如所示，对工作表Sheet1的列B中含有图片的单元格，输入“有图片”，而没有图片的单元格则输入“无图片”，效果如列G所示。
A：下面的代码可以完成我们的需求：
Sub DecidePic()
Dim cell As Range
Dim lngCells As Long
Application.ScreenUpdating = False
‘设置查找列的单元格数
lngCells = 3
For Each cell In Range(“B2:B”& lngCells)
If PicIfExists(Sheet1, cell) Then
cell.Value = “有图片”
Else
cell.Value = “无图片”
End If
Next cell
Application.ScreenUpdating = True
End Sub
Function PicIfExists(wks As Worksheet, rng As Range) As Boolean
Dim shp As Shape
For Each shp In wks.Shapes
If shp.TopLeftCell.Address =rng.Address Then
PicIfExists = True
Exit For
End If
Next shp
End Function
在自定义函数PicIfExists中，使用Shape对象的TopLeftCell属性来获取图片所在单元格的地址，然后与单元格相比较，以判断单元格中是否含有图片。
0
投稿猜你喜欢
昨天，苹果才给大家推送iOS 16.1正式版，今天苹果又向 iPhone 、iPad 用户推送了 iOS 16.2 / iPadOS 16.- 把数据变成图表虽然看似简单,但是有时候亲们只知道最简单的但也是最原始的办法。今天为大家介绍Excel SwiffChart快速制作精美的图表
- 如下图所示的表格，光标放置到其中一个单元格里 点击菜单栏里的表格——公式 这里粘贴函数处我们选择sum，这就是求和
- 今日，中国银联官方表示，银联手机闪付 Apple Pay“一键绑卡”功能正式上线。这意味着，用户在 iPhone 钱包应用中绑定银行卡时，不
- ①打开Excel表格，单击左上角office按钮，选择Excel选项。 ②在常用标签中点击编辑自定义列表选项。 &
- 其实可能很多的朋友，不知道段落边框是用来做什么的。它有时可以用来设置分割线，来给文档实现内容分割效果。这个段落边框的设置也不难，一起和小编了
- 很多时候我们word文件一不小心就可能损坏了，最后导致直接打不开了，遇到这种情况我们该怎么办?下面是小编整理的word文件损坏打不开的解决方
- 日常生活中，我们总免不了用到Word，有时候需要我们输入一个打着对勾的方框，也就是复选框。第一次想要输入这个符号的小伙伴可能不会，其实输入方
- 打印机是我们办公日常必备设备之一，近日很多小伙伴反映遇到了Windows10 无法连接网络打印机，错误代码0x00000709 的提示，那么
- Word页面上内容有底纹如何删除？不管是从网页上复制来的，或者自己添加的底纹，不需要了应该如何删除呢？1、选中文档内容，点击开始-字体，找到
- 在使用win10系统过程中，经常会用到一些压缩包等文件，有时会提示压缩文件损坏，导致整个压缩包无法打开。这样的错误提示很伤脑筋，也严重影响到
- 从网上下载下来的excel表格打开时功能区下方的消息栏中会显示一条警告信息，如下图所示，同时还会显示用于启用编辑的选项，很多朋友想退出受保护
- steam是一个全球排名靠前的综合 * 和程序下载平台，不少网友习惯在steam上下载游戏或者其他应用程序。不过有网友反映自己的win10无
- 本文教你如何将数据图表添加到Microsoft Word文档中。步骤部分 1在Word中插入图表打开Microsoft Word文
- 好多win10专业版的用户删除电脑文件的时候，文件不是很大，但是删除的速度非常慢，碰到这种情况该怎么解决呢？有三种方法，我们一起来看看。Wi
- 虽然win10系统界面新颖，视觉效果好，但一些用户在升级到win10系统后，认为原来的win7系统更适合它。因此，将win10还原为win7
- 在Word文档中，通过超链接，我们能够在文档内自由链接跳转，也能跳转到其他文档或应用程序，甚至与Internet直接连接，可以提高工作效率，
- 不知道是因为误操作还是由于曾借他人使用，小编前些天升级了Win10 1909的电脑中的语音识别功能莫名打开了。那么，Win10 1909该怎
- 出现“word制作表格保存后再打开表格没了直显示文字”的原因是：上一次启动word文档，但是没关闭而直接打开的另一个word。解决方法：将W
- Word的粘贴链接是指在Microsoft Word原始文档和目标文档之间建立一个动态链接，当原始文档的内容更新后，目标文档中的内容会同步更
