? Você precisa saber como determinar se o Microsoft Excel está em execução , se você vai ser o desenvolvimento de aplicativos usando o Visual Basic for Applications (VBA ) que irá utilizar o Microsoft Excel como uma saída para seus dados. A maneira mais rápida para determinar se um aplicativo está sendo executado em VBA é através de variáveis de objeto . Estas variáveis de objeto são capazes de se ligar ao Excel usando o " Excel.Application " identificador programático . Instruções
1
Inicie o Microsoft Word , clique na guia "Desenvolvedor" e clique em " Visual Basic " para iniciar o Editor do VBA. Clique no menu "Inserir" e clique em " Módulo " para inserir um novo módulo
2
Adicione o seguinte código para criar um novo procedimento : .
Private Sub IsExcelOpen () On Error GoTo Err_IsExcelOpen :
3
Copie e cole o seguinte código para determinar se o Excel já está em execução :
Dim xlsObject Como ObjectSet xlsObject = GetObject ( " Excel.Application " ;) Se ( xlsObject = " Microsoft Excel" ) ThenMsgBox " Excel está funcionando! " End If
4
Copiar e colar o seguinte código para capturar um erro se o Excel não está em execução e liberação o objeto da memória que foi criado no passo anterior :
Set xlsObject = NothingExit_IsExcelOpen : Exit SubErr_IsExcelOpen : If Err.Number = 429 ThenMsgBox " Excel não está funcionando! " End IfSet xlsObject = NothingEnd Sub < br >
5
Inicie o Microsoft Excel e pressione " F5" para executar o procedimento . Você receberá uma mensagem informando que o Excel está em execução. Feche o Excel e executar o procedimento novamente para receber uma mensagem do Excel não está funcionando.