Hi!
Within a macro ...I want to look at one cell ...then use the unique number in that cell to find and goto the cell that contains that same unique number in a List.
What's the simplest way to do it ??
Thanks,
Colin
GoTo a unique nunber in a list
-
-
Hi Colin
You could use the Find Method, e.g
CodeSub GoThere() Columns(1).Find(What:=Range("B1"), After:=Cells(1, 1), _ LookIn:=xlvales, LookAt:=xlWhole, SearchOrder:=xlByRows, _ SearchDirection:=xlNext, MatchCase:=False).Activate End SubHope it helps
-
This example assumes the unique value is in A1 of sheet 2 ... and list is on Sheet1 A1:A500
Public Sub FindInList()
On Error GoTo errr:
ValueToFind = Trim(Sheets("Sheet2").Range("A1").Value)
Worksheets("Sheet1").Activate
Worksheets("Sheet1").Range("a1:a500").Find(ValueToFind, LookIn:=xlValues, lookat:=xlWhole).Activate
Exit Sub
errr: pt = MsgBox(ValueToFind & " not found", vbCritical, "Not Found")
End Sub
Participate now!
Don’t have an account yet? Register yourself now and be a part of our community!