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!