thanks for the attention

But:
ctrl+h doesn't open the find box (in my office)
the macro recorder doesn't write the search

This what appears after registration:
Sub Macro1()
'
' Macro1 Macro
' cerca asterisco
'
CommandBars("Navigation").Visible = False
End Sub