VBA: Search cell value multiple sheets, then activate sheet

Hi all,

I have a workbook with multiple sheets. Every sheet has a header with unique numbers. To find an exact number I have to browse every sheet manually to find it.
I've managed to find this selecting all sheets and then use "Find & Select", but is it a way to do this using VBA?

I would like to enter the word I will search for in cell H2 in the first sheet, and then when I run macro, Excel will activate the sheet where the word is found.

I guess this is kind of easy to do, but I couldn't find a solution..


Thanks