Instrucción para dato no encontrado

Hola experto

Tengo la siguiente instrucción que me funciona perfectamente en un form de un libro de excel pero cuando quiero que esto mismo en otro libro con otro form me sale error en el método Lorange 104

Esta instrucción debe avisar si un código que se ingresa por texbox no se encuentra registrado en la pestaña data.

OptionExplicit
Dim rango1 As Range
Private Sub CommandButton1_Click()

Set rango1= Range(" data").Find(What:=TextBox1, LookAt:=xlWhole,LookIn:=xlValues)
If rango1 Is Nothing Then
MsgBox "Código no se encuentra en ladata. Intenta nuevamente", vbOKOnly + vbCritical, "control"
TextBox1 =Empty
TextBox2 =Empty
TextBox1.SetFocus
Exit Sub
End If