vbscript que abre excel, pero excel no ejecuta macro

[Laufwerk]

Hola chicos!
Pues eso , tengo el siguiente script

Código:

Set app = CreateObject("Excel.Application")
app.Visible = True
app.DisplayAlerts = True

Set objWB = app.WorkBooks.Open("C:\Documents and Settings\informatica\Escritorio\Unidades Servidores 2011.xlsm")
' Set objWS = app.ActiveWorkBook.WorkSheets(1)

app.EnableEvents = True
'app.Run "VerificarEspacios"

y el excel tiene este script en el auto open

Código:

Private Sub auto_open()
    ' MsgBox "Hola"
    Call VerificarEspacios
End Sub

Si abro el excel haciendo doble clic, se me ejecuta la funcion verificarespacios, pero si lo hago a traves del script no hace nada.

En el script tengo comentada la última linea de app.Run, porque se me bloquea el Excel.

Sabeis que se me escapa?


Gracias!

[wwwmaster]

Que hace la rutina "VerificarEspacios"??? x que, si por ejemplo, desde .net abres el archivo excel, ya puedes hacer referencia a los contenidos de hojas, columnas, renglones y celdas y manipular los datos, asi, no necesitarias mandar ejecutar el codigo dentro de esa macro-rutina.

[Laufwerk]

La subrutina verificar espacios está vinculada a un botón que lo que hace volcarme la información de un txt generado por un vbs al excel modificando formatos, celdas, etc...

Mi idea es que cada dia se me ejecute un vbs que me genera un txt con las unidades de los servidores con sus espacios disponibles correspondientes y a la vez se me autocomplete mi excel para correcta visualización del histórico.

Gracias por la respuesta.