乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > 如何用<em>excel</em> <em>vba</em>查找某一行&

如何用<em>excel</em> <em>vba</em>查找某一行&

作者:乔山办公网日期:

返回目录:excel表格制作


给你zd个列子 在 C列找 包含 “宁波” 的单元格 ,如果 是完全匹配 XLPART 改成XLWHOLE
Sub 查找()
Set findcell = Columns("c").Find("宁波", LookAt:=xlPart)
If Not findcell Is Nothing Then
MsgBox findcell.Row
Else
MsgBox "没找到符合条件的单元格"
End If
End Sub

可以用下面的语句:
最后一个值 = Sheets("sheet1").Range("A65535").End(xlUp).Value

用 col=range("C1").end(xltoright).column '找到最后非空一列
语句可能存在问题:当A1至A5数据连续时,该语句能返回正确
的结果,但当不连续时,将得不到最后一个非空结果

1
2

4
5
将只得到2,而不是5(其中3是空白,如果3有数值,将得到5)
这样你满足吗:
Sheets("Sheet").UsedRange.Select

亲,最zhidao后一句话没有理解。“该列的第一个非空单元格”是什么意思?能截图上来举例说明一下吗?

第一个功能很好实现,就一句话:

Sub test()
Cells(Rows.Count, "A").End(xlUp).Offset(1, 0).Select
End Sub

相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网