ENGinTraining
New Member
- Joined
- May 14, 2011
- Messages
- 14
I am attempting to write code so that after a Vlookup is performed, if it returns an error it enters into a loop and adds 1 until the vlookup finds an actual value from the chart. The program has no problem if there is no error found, but if an error is found it returns "#value!" in excel.
any suggestions?
Code:
Count = 0
orig_p = state3_p
orig_v = Application.WorksheetFunction.VLookup(state3_p, Table_A5E, 3, False)
If IsError(Application.WorksheetFunction.VLookup(orig_p, Table_A5E, 3, False)) = True Then
Do
Count = Count + 1
High_pressure = orig_p + 1
HP_side = Application.WorksheetFunction.VLookup(High_pressure, Table_A5E, 3, False)
Loop Until IsError(Application.WorksheetFunction.VLookup(High_pressure, Table_A5E, 3, False)) = False
End If
any suggestions?
Code:
Count = 0
orig_p = state3_p
orig_v = Application.WorksheetFunction.VLookup(state3_p, Table_A5E, 3, False)
If IsError(Application.WorksheetFunction.VLookup(orig_p, Table_A5E, 3, False)) = True Then
Do
Count = Count + 1
High_pressure = orig_p + 1
HP_side = Application.WorksheetFunction.VLookup(High_pressure, Table_A5E, 3, False)
Loop Until IsError(Application.WorksheetFunction.VLookup(High_pressure, Table_A5E, 3, False)) = False
End If