边学边收集:VB.net开发Excel程序,find函数的参数如何写?
Dim BBlb As Excel.Range
Dim BlbAddress As Integer 'String ''
With ExLapp.ActiveSheet
BBlb = .range(ExLapp.Cells(trow - 1, Blb), ExLapp.Cells(2, Blb)).Find(What:="X", Lookin:=Excel.XlFindLookIn.xlValues, LookAt:=Excel.XlLookAt.xlWhole, SearchDirection:=Excel.XlSearchDirection.xlPrevious)If Not BBlb Is Nothing Then
BlbAddress = BBlb.Row
End If
End With