VBA macro Text Filters -> Contains

[K0st4din]

Hello, everyone,
please for your assistance.
I have made a VBA form in which there is TextBox1.
I want to write something to find it in the selected worksheet named "Base" and column "P". (this part is most difficult for me to do).
I mean - Text Filters -> Contains
I would be very grateful if you could help me.

 

[jim may]

Let's Start here...

Paste the below code in the code window of your BASE worksheet.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$P$4" Then
Target.Value = TextBox1.Value
End If
End Sub

Then Click on Cell P4 of your Worksheet "Base".

 

[Fluff]

Maybe something like

   Sheets("Base").Range("A1:P1").AutoFilter 16, "*" & TextBox1.Value & "*"

 

[K0st4din]

Maybe something like

   Sheets("Base").Range("A1:P1").AutoFilter 16, "*" & TextBox1.Value & "*"

Thank you so much.
It has done a very good job, the macro.
Be alive and healthy.

 

[Fluff]

You're welcome & thanks for the feedback