Forum Discussion

alex_n's avatar
alex_n
Brass Contributor
Oct 15, 2021
Solved

Excel 365 ActiveX Textbox for "Search as you type" not working on second monitor

Hi All,   I have created a search-as-you-type searchable text box for excel Table "Materials" using ActiveX Textbox by adding a VBA code (i have provided the code below) to it. I have two issues th...
  • byundt's avatar
    byundt
    Oct 20, 2021

    It isn't clear to me what you see in the two different windows when using laptop with an external monitor. Is it two different worksheets? Two views of the same worksheet?

     

    I tested by creating a second window to display Sheet1. I sized the windows so one of them displayed just TextBox 1, while the other showed just the Table. When the textbox was in Window 2, I couldn't select it. When the textbox was in WIndow 1, the code shown below worked as desired.

    Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    Dim xStr As String, xName As String
    Dim xRg As Range
    
    Application.ScreenUpdating = False
    With TextBox1
        xName = "Materials"
        xStr = .Text
        Set xRg = .Parent.ListObjects(xName).Range
        If xStr <> "" Then
            xRg.AutoFilter Field:=2, Criteria1:="*" & xStr & "*", Operator:=xlFilterValues
        Else
            xRg.AutoFilter Field:=2, Operator:=xlFilterValues
        End If
    End With
    
    End Sub