Open "New Database Query" Dialog box thru macro

I want to open the the dialog box provided by menu item Data->Import External Data->"New Database Query" when the xls file is opened. I am doing this in record macro.

When I retreive the Command Control for "New Database Query" and execute it, I get "Automation Error, Unspecified Error". Is there anything wrong that I am doing here ?
Following is the code:

Please Login or Register  to view this content.

I have also tried an alternate approach to get the control using the following command:

Please Login or Register  to view this content.

Here I get the dataMenu as Nothing.

Is there any way I can open the dialog box for "New Database Query" through a macro.

Hi Kavita,

Try one of the below codes -

Please Login or Register  to view this content.

OR

Please Login or Register  to view this content.

Best Regards,
Tarun Juneja
Excel-o-ratoR

Good afternoon Kavita Salve and Excel-o-ratoR

...and welcome to the forum!!

However, please note thatneither of your posts comply with Rule 3 of our Forum RULES. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the # at the top of your post window. For more information about these and other tags, found here

DominicB