help with stubborn code!!!

[fry]

This works

Sub Macro1()
Application.CommandBars.FindControl(ID:=1849).Execute
Application.SendKeys ("%t %h {DOWN} %n {ESC}")
End Sub


And this doesn't

Private Sub CommandButton5_Click()
Application.Dialogs(xlDialogValueFind).Show
Application.SendKeys ("%t %h {DOWN} %n {ESC}")
End Sub


Any ideas would be gratefully received

[mudraker]

Please read forum rules - see links below

You need to wrap your VBA code
You need to post your thread in the correct forum - Programming
You need to use a more suitable thread title

If you do not understand the VBA code wrap instructions have a look at my last reply in this thread
http://www.excelforum.com/showthread.php?t=583950

Closing thread

[fry]

Hi Mudraker

I actually did look for the tags to wrap the code in but didn't see them (I'm used to the mrexcel.com forums) and that's also the reason for posting in the top forum.............I thought I was on mrexcel again. As for the subject, I wouldn't know how to express it any other way as I'm new to this and I was coming to the end of mt tether....

Anyway that said I'll take up your suggestions, post in the correct forum and try and remember where I am in future...