Finding a row in Excel

[callumwk]

Hey,

I need to make a section of code that will search for a term like "1000" and find the row that contains it. (there will never be two the same) and then save that row.

I have this for finding the last row edited:

  Dim oExcel As Object
        Dim oBook As Object
        Dim oSheet As Object
        Dim LastRow As Long
        Dim lastjn As Integer
        Dim newjb As Integer

        oExcel = CreateObject("Excel.Application")
        oBook = oExcel.Workbooks.Open(My.Computer.FileSystem.SpecialDirectories.MyDocuments + "\job.xlsx")
        oSheet = oBook.worksheets(1)

        LastRow = oSheet.UsedRange.Rows.Count

So im guessing it will be simular, just searching for a term instead of last edited.

Thanks