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

[Newton_N]

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