Why it doesn't work
Maybe there's a difference between what's in the comboboxes and what's in those
cells--upper/lower case differences, spelling differences, differences in
spaces????
"François" wrote:
Hi,
Why this code stop always at the last not empty line (7269). The data is at
line 6839. Any tought.
Dim Line As Integer
For u = 2 To .Range("A65536").End(xlUp).Row
If .Cells(u, 1) = Me.Combo1.Text And .Cells(u, 2) = Me.Combo2.Text And
.Cells(u, 3) = Me.Combo3.Text And .Cells(u, 4) = Me.Combo4.Text Then
Line = u
Exit Sub
End If
Next
Thanks
--
Dave Peterson
|