• Tengo una macro que necesito para que se ejecute cada 5 min. Tengo un vbs archivo que los horarios de la macro.
  • La macro está buscando nuevos archivos en alguna carpeta, escribe su información en una tabla, y mover los archivos en un archivo.
  • La tabla se encuentra en el mismo archivo de excel como el macro!

Se está ejecutando la macro bien, pero en el extremo, su preguntarme si no me voy a guardar el archivo.

La necesito para guardar los cambios que la macro se hizo para el archivo de forma automática!

este es mi actual vbs código:

Option Explicit

Dim xlApp, xlBook

Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = False
Set xlBook = xlApp.Workbooks.Open("W:\Excel Macro\EIM File Maneger\EIM_file_check.xlsm", 0, True)

xlApp.Run "GetFiles"

xlBook.Close true
xlApp.Quit

Set xlBook = Nothing
Set xlApp = Nothing

WScript.Echo "Finished."
WScript.Quit
InformationsquelleAutor ALEXM | 2015-03-29

1 Comentario

  1. 4

    Actualizado el código de abajo, también he ajustado la lógica de la limpieza

    Dim xlApp, xlBook
    
    Set xlApp = CreateObject("Excel.Application")
    xlApp.DisplayAlerts = False
    Set xlBook = xlApp.Workbooks.Open("W:\Excel Macro\EIM File Maneger\EIM_file_check.xlsm", 0, True)
    
    
    xlApp.Run "GetFiles"
    
    xlbook.Save
    xlBook.Close False
    set xlBook = Nothing
    
    xlApp.Quit
    Set xlApp = Nothing
    
    WScript.Echo "Finished."
    WScript.Quit
    • La necesito para guardar el archivo con los cambios
    • ¿qué ha cambiado?
    • Añadido xlbook.Save
    • las grandes obras tnx
    • Parece que esto no debe trabajar, como especificar el archivo se abrirá en ReadOnly modo.
    • acabo de utilizar este código para una tarea similar y yo deseo que yo tenía de leer tu comentario en primer lugar. Desde DisplayAlerts que es falso y que el archivo es de solo lectura, en silencio, no se guardan. La actualización de la lectura sólo parámetro a false hizo solucionar el problema

Dejar respuesta

Please enter your comment!
Please enter your name here