For loop not working when i assign form to button in VBA

I created a form in VBA with 4 fields, the ideal is that when i pick using the first field (Selecting from a combobox) the rest of the field gets updated with information using 'for loop'. This works fine until i assign the form to a button, when the form loads and show suddenly the 3 fields do get updated automatically depending on the data selected in the first field.

Private Sub Relocate_Change()
Dim i As Integer
Dim lastrow As Integer

lastrow = WsData.Range("A10000").End(xlUp).Row
For i = 1 To lastrow
If Cells(i, 2) = Relocate.Value Then
RelocateToCombo.Value = Cells(i, 4)
RelocateDepartment.Value = Cells(i, 5)
RelocateBranch.Value = Cells(i, 6)
End If
Next i
End Sub

Hi, So just edited the code to include "with statement" but still when i assign the form to a button (in another sheet) when i can the form using the button it comes but failing to populate the fields

Have made the edits and the code looks like this now

Dim i As Integer
Dim lastrow As Integer

With WsData
lastrow = WsData.Range("A10000").End(xlUp).Row

For i = 1 To lastrow
If Cells(i, 2) = RelocateAssetNumber.Value Then
RelocateAssignedToCombo.Value = .Cells(i, 4)
RelocateDepartment.Value = .Cells(i, 5)
RelocateBranch.Value = .Cells(i, 6)

End If
Next i
End With

But unfortunately, am still facing the same problem

It has worked. THANK YOU VERY MCUH