Je moet weten hoe om te bepalen of Microsoft Excel wordt uitgevoerd als je gaat om te ontwikkelen van applicaties met behulp van Visual Basic for Applications ( VBA ) dat Microsoft Excel wordt gebruikt als een uitgang voor uw gegevens . De snelste manier om te bepalen of een toepassing wordt uitgevoerd in VBA is via object-variabelen . Deze object-variabelen zijn in staat om te binden aan Excel met behulp van de " Excel.Application " programmatische identifier . Instructies
Lancering Microsoft Word 1 , klikt u op het tabblad " Developer " en klik op " Visual Basic " om de VBA -editor te starten . Klik op het menu "Invoegen " en klik op "Module " om een nieuwe module te voegen kopen van 2 Voeg de volgende code om een nieuwe procedure te maken: . Private Sub IsExcelOpen
( ) On Error GoTo Err_IsExcelOpen :
Kopieer 3 en plak de volgende code om te bepalen of Excel al actief is : Dim xlsObject
Zoals ObjectSet xlsObject = GetObject ( , " Excel.Application " ;) Als ( xlsObject = " Microsoft Excel " ) ThenMsgBox " Excel wordt uitgevoerd ! " End If
Kopieer 4 en plak de volgende code om een fout als Excel vast te leggen is niet actief en loslaten het object uit het geheugen die is gemaakt in de vorige stap :
Set xlsObject = NothingExit_IsExcelOpen : Exit SubErr_IsExcelOpen : Als Err.Number = 429 ThenMsgBox " Excel is niet actief ! " End IFSET xlsObject = NothingEnd Sub < br >
Start Microsoft Excel en druk op " F5 " 5 om de procedure uit te voeren. U ontvangt een bericht waarin staat dat Excel wordt uitgevoerd ontvangt . Sluit Excel en voer de procedure opnieuw om een bericht van de Excel loopt niet ontvangen.
|
