DATEDIF函数怎么精确计算年月日?DATEDIF函数,用于计算两个日期之间的天数、月数或年数。 具体用法: 语法: DATEDIF(start_date,end_date,unit); 中......
2023-05-29 0 Excel函数,excel函数公式,excel教程,WPS
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属性来获取图片所在单元格的地址,然后与单元格相比较,以判断单元格中是否含有图片。
标签: WPS excel ppt图片修改透明度 ppt图片怎么修改透明度 ppt图片透明度 图片 ppt背景图片 ppt背景图片设置 单元 识别 如何设置WPS图案图
相关文章
DATEDIF函数怎么精确计算年月日?DATEDIF函数,用于计算两个日期之间的天数、月数或年数。 具体用法: 语法: DATEDIF(start_date,end_date,unit); 中......
2023-05-29 0 Excel函数,excel函数公式,excel教程,WPS
excel怎么自动分配数字序号 Q:在进行学生入学登记时,如何为不同的班级自动按顺序分配学号。如下所示,在登记学生姓名,并分配班级后,给该学生自动按顺序分配学号。 A:使用公式来解决。 因为......
2023-05-29 0 WPS
“你的数据,还要多久,才能整理好?”这大概是HR小赵每天听到最多,也最害怕听到的一句话了。 其他同事早就把整理好的数据发到群里了,而她还在低头拼命地算,领导也一直在死命地催。这感觉就像回到了高考,马......
2023-05-29 0 Excel万能函数公式,Excel函数,excel函数公式,WPS
excel怎么识别带图片的单元格 Q:前不久有网友问我,在工作表的一列中,有些单元格放置有图片,有些单元格为空,如何识别带有图片的单元格并输入相应的文字?如所示,对工作表Sheet1的列B中含有图片......
2023-05-29 0 WPS
VBA怎么做数据透视表?在Excel中,我们会往工作表中输入数字、日期、文本,有时还会粘贴上图片,这些输入的内容都是数据。我们在Excel中制作了一个学生入学成绩信息的工作表,如下所示。 上面有......
2023-05-29 0 excel数据透视表,VBA怎么做数据透视表,VBA数据透视表,WPS