作者:乔山办公网日期:
返回目录: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