use vb (not VBA) to search EXCEL Cells
I am using Visual Basic Express Edition and would like to search an Excel file for a particular Value in a specific cell. Is this possible without getting a brain cramp?
ASKER
Wayne,
Awesome. It worked. How about searchnig a specific cell, say E:21 for another 150 pts?
Awesome. It worked. How about searchnig a specific cell, say E:21 for another 150 pts?
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
Wayne,
I am looking through 100s of Excel spreadsheets, searching for a spefiic value in cell E21.
I am looking through 100s of Excel spreadsheets, searching for a spefiic value in cell E21.
evault,
You'll need to open each of them, and check the value of cell E21 (as I've shown above) versus the value you are looking for.
Wayne
You'll need to open each of them, and check the value of cell E21 (as I've shown above) versus the value you are looking for.
Wayne
ASKER
Wayne,
If I may be so bold, could you recomend a good book for VB. I have 20+ years as a programmer but almost experience with VB (you may have noticed).
If I may be so bold, could you recomend a good book for VB. I have 20+ years as a programmer but almost experience with VB (you may have noticed).
I can't recommend any books, sorry, as I don't use any. My suggestion is to use the F1 key heaps, and ask stacks of questions here on EE.
ASKER
Good enough. I can use your snippet to accomplish what I need. Thanks.
Using late binding (ie, no references required)....
Dim xlApp As Object = CreateObject("Excel.Applic
Dim xlWB As Object = xlApp.Workbooks.Open("C:\W
Dim xlWS As Object = xlWB.Worksheets("Sheet1")
Dim xlFndCell As Object = xlWS.Cells.Find("the value", , -4163, 1)
If Not xlFndCell Is Nothing Then
MsgBox("The value is found in cell " & xlFndCell.Address)
End If
xlWB.Close()
xlApp.Quit()
xlWS = Nothing
xlWB = Nothing
xlApp = Nothing
Regards,
Wayne