Eu tenho uma macro da qual atualmente baixamos uma planilhaAtualizar: e ele abre automaticamente (e não salva) -de nossa interface web interna personalizada. O nome da planilha muda a cada vez. As instruções de utilização atuais são abrir o Editor VBA, copiar a macro para o novo módulo e executar a macro.
Eu gostaria de criar um arquivo independente para tornar as instruções mais ou menos assim, abrir a pasta de trabalho e clicar duas vezes no arquivo.
Minha opinião seria que eles só poderiam ter a pasta de trabalho em questão aberta e o código do arquivo independente seria algo como use open workbook(muito genérico).
Eu li sobre vbs, mas tudo que fiz foi mudar minha macro de .txt para vbs e claramente ainda não funciona. Alguém pode me apontar na direção certa?
Responder1
Embora tenha conseguido fazer isso funcionar, não utilizei esse método, pois envolvia a ativação de uma configuração "Confiar no projeto VBA" no Office e não me parece seguro.
Aqui está como funcionaria:
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
O que acabei fazendo foi distribuir o "OfficeUI" personalizado via ->https://www.freesoftwareservers.com/display/FREES/Distributing+Macro+via+Add-In+-+Customized+Ribbon+-+Via+Batch
Por algum motivo, os arquivos em XLSTART e Personal.xlsb não foram carregados ao carregar o Excel por meio do link em nossa interface da web. Mas, a faixa de opções personalizada do OfficeUI foi carregada. Ainda coloquei o AddIn.xlam em XLSTART porque o Excel não avisou sobre "Macros", mas não foi carregado na inicialização. Não importa porque o OfficeUI chamou o arquivo!Sub diretamente.