Adding an excel menu button to a specific sheet?

[jtzako]

I'd like to create a button on my excel sheet that opens the "New Web Query" window.

I don't seem to be able to drag the icon down and I'd rather have it only visible on the one "sheet" of the workbook.

 

[Andrew Poulsom]

Add a CommandButton from the Control Toolbox, set its TakeFocusOnClick property to False and assign it this code:

Private Sub CommandButton1_Click()
    Application.Dialogs(xlDialogNewWebQuery).Show
End Sub

 

[jtzako]

I get an error with that code..

Show Method of Dialog class failed.

 

[Andrew Poulsom]

You will get an error if the TakeFocusOnClick property is True. Did you set it to False?

 

[jtzako]

Apologies, I did not catch that part of your instruction. It works now that I set that to False.

Thanks again!