Search Value Return Offset To Userform Labels Or Textbox?

I'm trying to search a column to match the value in textbox1 then return to the userform the values from the same row in columns A to textbox2 and so forth.

I can get it to find the value but am struggling to get the data back to the userform

Reason for this is so the user can search an Id, get all the data back on the order before changing the Id number

The code im trying to use is

Code:

Private Sub CommandButton1_Click()
Dim lr As Long, i As Long
Dim x As Variant, y As String
Dim Found As Range
x = TextBox1.Value
y = UserForm2.TextBox2

[Code]....