Hai bisogno di sapere come determinare se Microsoft Excel è in esecuzione se si sta andando ad essere lo sviluppo di applicazioni con Visual Basic, Applications Edition (VBA) che utilizzeranno Microsoft Excel come uscita per i tuoi dati . Il modo più rapido per determinare se l'applicazione è in esecuzione in VBA è attraverso le variabili oggetto . Queste variabili oggetto sono in grado di legarsi a Excel utilizzando il " Excel.Application " identificatore programmatico . Istruzioni
1
lancio di Microsoft Word , fare clic sulla scheda "Sviluppatore " e cliccare su " Visual Basic " per avviare l'editor di VBA . Fare clic sul menu "Inserisci" e fare clic su "Modulo " per inserire un nuovo modulo
2
Aggiungere il seguente codice per creare una nuova procedura : .
Private Sub IsExcelOpen ( ) On Error GoTo Err_IsExcelOpen :
3
Copia e incolla il seguente codice per determinare se Excel è già in esecuzione :
Dim xlsObject Come ObjectSet xlsObject = GetObject ( , " Excel.Application " ;) Se ( xlsObject = "Microsoft Excel " ) ThenMsgBox " Excel è in esecuzione ! " End If
4
Copia e incolla il seguente codice per catturare un errore se Excel non è in esecuzione e il rilascio l'oggetto dalla memoria che è stato creato nel passaggio precedente :
xlsObject = NothingExit_IsExcelOpen : Uscita SubErr_IsExcelOpen : If Err.Number = 429 ThenMsgBox " Excel non è in esecuzione ! " End IFset xlsObject = NothingEnd Sub < br >
5
Avviare Microsoft Excel e premere il tasto "F5" per eseguire la procedura . Si riceverà un messaggio che indica che Excel è in esecuzione . Chiudere Excel ed eseguire nuovamente la procedura per ricevere un messaggio di Excel non è in esecuzione .