Web service en excel2010

Doctor muy buenas tardes, para comentarle que estoy buscando ayuda con un ejemplo de web services desde excel, de como invocarlo con una rutina y darle un select como un dataset, y luego colocarlo en una hoja de excel, por favor, alguien me puede ayudar.
Nota: el servicio ya lo tengo referenciado en excel, solo me falta la rutina para invocar a dicho web service y jalar el dato en excel en un hoja.
Pero me gustaría manejar rangos de fechas.
Gracias
El web service apunta a un base de datos sql.
Ejemplo :
Para su ayuda
Private Sub CommandButton1_Click()
Dim clsCotizacion As clsws_WsTes1
Dim monedas As Range
Dim moneda As Range
Dim cotizacion As String
clsCotizacion = New clsws_WsTes1
monedas = Range(Range("b2"), Range("h65536").End(xlUp))
Application.ActiveSheet.Range("b2").Activate
For Each moneda In monedas
cotizacion = clsCotizacion.wsm_WSQLTest1("select * from si_usuarios")
moneda.Offset(0, 1).Value = Val(cotizacion)
Next moneda
End Sub
Nota: algo así me gustaría con un select, y luego meterlo a una hoja excel