? Vous avez besoin de savoir comment déterminer si Microsoft Excel est en cours d'exécution si vous allez à développer des applications en utilisant Visual Basic pour Applications ( VBA) qui vont utiliser Microsoft Excel comme une sortie pour vos données. La meilleure façon de déterminer si une application est exécutée en VBA est à travers des variables d'objet . Ces variables objet sont capables de se lier à Excel en utilisant le " Excel.Application " identificateur programmatique . Instructions 1 Lancez Microsoft Word, cliquez sur l'onglet "Developer " et cliquez sur " Visual Basic " pour lancer l'éditeur VBA . Cliquez sur le menu "Insertion" et cliquez sur " Module " pour insérer un nouveau module 2 Ajoutez le code suivant pour créer une nouvelle procédure : . Privé IsExcelOpen Sub ( ) On Error GoTo Err_IsExcelOpen : 3 Copiez et collez le code suivant pour déterminer si Excel est déjà en cours d'exécution: xlsObject As ObjectSet xlsObject = GetObject ( , " Excel.Application " ;) Si ( xlsObject = " Microsoft Excel " ) ThenMsgBox " Excel est en marche! " End If 4 Copiez et collez le code suivant pour capturer une erreur si Excel n'est pas en cours d'exécution et la libération l' objet de la mémoire qui a été créé à l'étape précédente : Set xlsObject = NothingExit_IsExcelOpen : Sortie SubErr_IsExcelOpen : Si Err.Number = 429 ThenMsgBox " Excel ne fonctionne pas ! " Fin IFSET xlsObject = NothingEnd Sub < br > 5 Démarrez Microsoft Excel , puis appuyez sur la touche "F5 " pour exécuter la procédure . Vous recevrez un message indiquant que Excel est en marche. Fermez Excel et exécuter à nouveau la procédure de recevoir un message l' Excel ne fonctionne pas.
|