help with Excel macro

[TeunRoos]

Hello all,

I would like someone to try and make me a macro that can display a couple of rows and columns based on a searched variable.

I added a link to an example of a part of the excel document that I am working in. (It is a Google Spreadsheet)

For example, I want to display row 26 up to row 35 when I search for "testb.com".
Or row 16 up to 25 when I search for "testa.com".

If anyone could help me, thanks!!

https://docs.google.com/spreadsheet...P_a5_TpHFwUhN8uNdDxaACRPWzU/edit?usp=sharing​

 

[Fluff]

Hi & welcome to MrExcel
Are you going to be running this in Excel, or in GoogleSheets?

 

[TeunRoos]

It's going to be in excel, I copied it in spreadsheets just for ease

 

[Fluff]

Ok, how about

Sub TeunRoos()
   Dim Srch As String
   Dim Rng As Range
   
   Srch = InputBox("Enter search item")
   If Srch = "" Then Exit Sub
   For Each Rng In Range("A16", Range("A" & Rows.Count).End(xlUp)).SpecialCells(xlConstants).Areas
      If Rng.Offset(, 2).Resize(1, 1).Value = Srch Then
         Rows("16:" & Rows.Count).Hidden = True
         Rng.Offset(-1).Resize(Rng.Count + 1).EntireRow.Hidden = False
      End If
   Next Rng
End Sub

 

[TeunRoos]

Thanks for the help!

It does kind of work the way it's supposed to, but I tried it and now I lost half of my sheet..

 

[TeunRoos]

I am pretty new when it comes to Excel, but I found out how to fix this.
Now I have another question, now I have to run the macro via a keyboard shortcut after which I can enter the variable I want to search, but is there a way of just entering the variable into a cell?

 

[Fluff]

Which cell will you enter the search into?