[Programmer-VB] xlDialogSearch

[Montadar]

hi,

in excel 2007,
i need to display the search box, i wrote the following code but it does not 
display it:

Sub Find()
Application.Dialogs(xlDialogSearch).Show
End Sub

help please