Hello, I was wondering if anyone could help me wih this:

Sub CBadd_Click()
    
    If OptionButton1.Value = True Then
            With Sheets("Metallize")
            On Error Resume Next
            Set X = Sheets("Metallize").Find(ComboBox1.Value, _
            LookIn:=xlValues, lookat:=ExcelWhole)
        MsgBox (X)
        End With
    End IF
End Sub
I keep getting an error that says "Object Doesn't Support This Property Or Method")

I am trying to find the value from ComboBox1 in the 'Metallize' worksheet. I could also just search through the columns in the first row, but I don't know how to designate the range for that
Any help would be greatly apreciated. Thanks in advance!