change olayında iki veriyi birleştirip getirme

Herkese Merhaba aşağıdaki kodlarla Change olayı ile verileri textboxlara cekebiliyorum Private Sub TextBox9_Change() Dim bul On Error Resume Next bul = Sheets("VERİ").Range("B2:B100000").Find(What:=TextBox9, LookIn:=xlValues, lookat:=xlWhole).Row TextBox2.Value =...