Number stored as text beiung used in macro 1

[SmithyJD]

Hi I have a macro which is reading data from one work sheet and matching it to another however occasionally the user ends up the the source data as number stored as txt (its being filled in by some remote app) consequently when I come to use it in my macro it dont always match. Is the an equvalent way of taking the cell and converting it to numeric as using the Value(A1) option on a spreadsheet.

the macro statment doing this match is

Lrow = Application.WorksheetFunction.Match(Portfolio, Range("A:A"), 0)
On Error GoTo 0

Thanks in hope.

Jd

 

[SkipVought]

hi,

converting it to numeric

dim lRow as Variant
Lrow = Application.WorksheetFunction.Match(Val(Portfolio), Range("A:A"), 0)

if not iserror(lRow) then
   'actually found it!!!
else
   'actually found NOTHING
end if

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[SmithyJD]

Thank you a prefect solution!