Ejecute la macro como un archivo independiente con una hoja de cálculo de Excel abierta activa

Ejecute la macro como un archivo independiente con una hoja de cálculo de Excel abierta activa

Tengo una Macro de la cual actualmente descargamos una hoja de cálculo.Actualización: y se abre automáticamente (y no guarda) -desde nuestra interfaz web interna personalizada. El nombre de la hoja de cálculo cambia cada vez. Las instrucciones de uso actuales son abrir el Editor VBA, copiar la Macro en un nuevo módulo y luego ejecutar la Macro.

Me gustaría crear un archivo independiente para que las instrucciones sean algo como esto, abrir el libro de trabajo y luego hacer doble clic en el archivo.

Mi pensamiento sería que solo podrían tener abierto el libro en cuestión y el código del archivo independiente sería algo así como use open workbook(Muy genérico).

Leí sobre vbs, pero todo lo que hice fue cambiar mi macro de .txt a vbs y claramente aún no funciona. ¿Alguien puede indicarme la dirección correcta?

Respuesta1

Si bien pude hacer que esto funcionara, no utilicé este método ya que implicaba habilitar una configuración de "Confiar en el proyecto VBA" en Office y no me parece seguro.

https://security.stackexchange.com/questions/205803/is-it-safe-to-enable-trust-access-to-the-vba-object-model-microsoft-office/205814#205814

Sin embargo, así es como funcionaría:

Dim  xlApp, xlBook

Set xlApp = getObject( , "Excel.Application")
Set xlBook = xlApp.ActiveWorkbook

xlBook.VBProject.VBComponents.Import "\\PATH\Module1.bas"
xlApp.Run "Sub_Name"
'objExcel.ActiveWorkbook.Close


xlApp.Application.Quit
WScript.Echo "Finished."
WScript.Quit

Lo que terminé haciendo fue distribuir la "OfficeUI" personalizada a través de -->https://www.freesoftwareservers.com/display/FREES/Distributing+Macro+via+Add-In+-+Customized+Ribbon+-+Via+Batch

Por alguna razón, los archivos en XLSTART y Personal.xlsb no se cargaron al cargar Excel a través del enlace en nuestra interfaz web. Pero se cargó la cinta personalizada de OfficeUI. Todavía coloqué AddIn.xlam en XLSTART porque Excel no advirtió sobre "Macros", pero no se cargó al inicio. Sin embargo, no importa porque OfficeUI llamó al archivo! Sub directamente.

información relacionada