Hi there, I am using the follwing code to identify the row/column position of a particular value within a range of values (in this example, it is a value ranging from 1 to 10).
The probelm is however, If the 'Level' = 1, then the code below returns the row / column position for the value 10. Does anyone know what I am doing worng and how I can correct this.
Regards
Mark
Level = Range("A1").Value
With Worksheets(1).Range("B1:B10")
Set c = .Find(Level, LookIn:=xlValues)
If Not c Is Nothing Then
Level_Address = c.Address(RowAbsolute:=False)
Level_Row = c.Row
Level_Col_Num = c.Column
Level_Col_Let = Mid(c.Address, 2, (InStr(2, c.Address, "$")) - 2)
End If
End With
The probelm is however, If the 'Level' = 1, then the code below returns the row / column position for the value 10. Does anyone know what I am doing worng and how I can correct this.
Regards
Mark
Level = Range("A1").Value
With Worksheets(1).Range("B1:B10")
Set c = .Find(Level, LookIn:=xlValues)
If Not c Is Nothing Then
Level_Address = c.Address(RowAbsolute:=False)
Level_Row = c.Row
Level_Col_Num = c.Column
Level_Col_Let = Mid(c.Address, 2, (InStr(2, c.Address, "$")) - 2)
End If
End With