Ejecución Sql

"Mauro" escribió en el mensaje news:

Tengo una consulta en Sql que trae datos de otro sistema y quiero agrgar un
botón que en excel que me ejecute dicha consulta. Como debo hacer?

Si el botón está creado desde la barra de herramientas 'Cuadro de controles', tendrías que poner el siguiente código en el módulo de la hoja:

Private Sub CommandButton1_Click()
Me.QueryTables(1).Refresh
End Sub


Y si el botón está creado desde la barra de herramientas 'Formularios', tendrías que crear un nuevo módulo, poner el siguiente código en él:

Sub ActualizarConsulta()
Worksheets("Hoja1").QueryTables(1).Refresh 'Sustituir Hoja1 por el nombre de la hoja
End Sub

y asociar el botón al código.

En ambos casos estoy suponiendo que en la hoja tan sólo hay una consulta.
Un saludo.


Fernando Arroyo
MS MVP - Excel