Autofilter & TextBoxes ... Left Over Character After Filter

.
Two of the textboxes are designed to display a CHECK MARK when double-clicked. Also, if double-click again, the CHECK MARK is removed.

Now to the issue :

As the images below demonstrate, after the filter has been completed ... the textbox automatically erases the CHECK MARK (there is nothing in the autofilter macro that does this) and a
QUESTION MARK is displayed in the textbox.

WHY does the question mark show up ?

I've looked at all the PROPERTY settings for the textbox and compared it with the other textboxes. I do not find anything different. And, again ... there is nothing in the macros
that would instruct the insertion of the question mark.

Thank you for reading and any assistance.


#1 : Textbox double-clicked and the check mark is inserted.

Search Entry.jpg



#2 : Search result.

Search Result.jpg



#3 : After search is completed.

Final.jpg




This is the autofilter macro :

Sub FilterAllCols2()
    Application.ScreenUpdating = False
    Dim LastRow As Long, x As Long
    Range("D:D").Columns.TextToColumns DataType:=xlDelimited, FieldInfo:=Array(1, 2)
    
    LastRow = Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
    For x = 1 To 4
        If ActiveSheet.OLEObjects("TextBox" & x).Object <> "" Then
            
            With Cells(2, 1).CurrentRegion
                .AutoFilter x, "*" & ActiveSheet.OLEObjects("TextBox" & x).Object.Text & "*"
            End With
        End If
    Next x
    Application.ScreenUpdating = True
    Range("A2").Select
End Sub

Here is the double-click macro :

Private Sub TextBox3_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
        If TextBox3.Value = ChrW(&H2713) Then
            TextBox3.Value = ""
        Else
            TextBox3.Value = ChrW(&H2713)
        End If
End Sub