auto fill a spreadsheet on a userform based on a textbox value

Hi i am trying to autofill row and colums on a spreedsheet on a userform based on a worksheet. I can get each cell to return the value but want with long lines of code but want to know if there is a easy way to achieve this.

Private Sub UserForm_Initialize()
Me.TextBox1.Value = Sheet49.ComboBox1.Value

Dim SpreadSheetSearch As Range
Set SpreadSheetSearch = Sheets("cb").Columns("A").Find(TextBox1.Text)


Me.Spreadsheet1.Range("b2").Value = Sheets("CB").Range("j" & SpreadSheetSearch.Row).Value ' this is where i want it to fill "c2" with the next column based on the spreadsheetsearch.row

Hi

I'm no expert but I'm sure the expert will agree that a sample will make you question less confusing.

Do you want to fill the form or the spreadsheet??

I want to fill the spreadsheet on the userform.

CopyWashPlant.xlsm