Symbols after value of variable

Question

I Have a code like:

For i = 1 To fRow
    ali = wbTarget.ActiveSheet.Cells(i, 14).Value

    For j = 1 To fRow
        If nwb.Sheets(1).Cells(j, 3).Value = ali

what exactly happens is:

1. We give a value for variable "ali" that is in column 14.
2. We compare that variable with another cell

Issue is:

• "ali" value can be let's say 85020, but the value we compare it with can be 850200. As you see there is 1 additional zero behind. I want them to be matched. How can I perform ali* to the variable?

Thank You very much!

Answer 1

Change

If nwb.Sheets(1).Cells(j, 3).Value = ali

To

If nwb.Sheets(1).Cells(j, 3).Value = ali Or _
nwb.Sheets(1).Cells(j, 3).Value Like ali & "*" Then