Excel Macro's zijn programma's geschreven in de programmeertaal Visual Basic for Applications . Deze programma's kunnen elke taak in Excel te automatiseren . Om dat resultaat te bereiken , moet u het volgende doen : macro's opnemen , te wijzigen in de geïntegreerde ontwikkelomgeving ( IDE ) ; debuggen hen en raadpleeg de IDE 's object browser voor informatie over de virtuele voorwerpen ze afhankelijk zijn . Maak een Macro Maak een macro : openen van een nieuwe Excel-werkmap , voer vervolgens een korte kolom van nummers die stijgt van 10 tot 20 . Selecteer de kolom na het invoeren van het. Begin het opnemen van de macro door op de rechthoekige knop aan de linkerkant van de Excel statusbalk op het scherm onderaan . Name of the macro " mySort , " druk vervolgens op de " Sort " icoon op de werkbalk van Excel . Kies " Sort grootste naar de kleinste , " dan stopt de macro opnemen door weer op de macro -knop Replay de Macro Test Voeg uw macro : . Opnieuw de initiële kolom met getallen , maar in een andere werkbladlocatie . Zorg ervoor dat de nummers gaan van 10 tot 20 zoals voorheen . Selecteer de kolom en druk op ' Alt - F8 "om een lijst met macro's weer te geven . Dubbelklik op uw macro , en merk het effect : de kolom werd niet gesorteerd ditmaal Bekijk de Code Macro's soms niet op te nemen . de precieze taken die je ze van plan. In deze gevallen moet u de code vast te stellen . Druk " Alt - F8 " om het scherm opnieuw een lijst met macro's . Selecteert u uit de lijst en druk op "Edit " om de IDE te voeren . Let op de getallen in offertes . Zij zijn de reden dat je macro is niet correct sorteren van : . De macro sorteert slechts een specifieke plaats in het werkblad Herziening van de macro Begin aan de macro- fix : selecteer gewoon de code die als volgt luidt : Key : = range ( " G5 " ) ' ( . Je code zal waarschijnlijk een ander bereik in de aanhalingstekens weergegeven ) Verandering die lijn te lezen als volgt : Key : = Selection.Columns ( 1 ) op Wijzig de andere onjuiste code regel die luidt als volgt : . SetRange Range ( " G5 : G15 " ) Verandering die code om deze : . SetRange Selection Terug naar Excel en opnieuw uitvoeren van de macro . Bericht dat uw code nu met succes sorteert het bereik . Step door en verander de code Pers Nieuws " Alt - F11 " om terug te gaan naar de IDE , druk dan op " F2 " naar het object browser in te voeren . Hier leer je over een van de objecten die uw code gebruikt om te sorteren - het object SortFields . Enter " SortFields " in het zoekvak , licht dan de "Add" item in de "Leden van ' SortFields ' " venster . De IDE vertelt u wat de functie Add nodig om te werken , met inbegrip de parameter "Order " . Deze parameter bepaalt of de soort is oplopend of aflopend Dynamisch veranderen sorteervolgorde van dalende naar oplopende : . Terug naar je programmacode door op ' Alt - F11 " om terug te keren naar Excel , vervolgens op " alt - F8 . " Selecteer de naam van uw macro , druk daarna op " Edit " om naar de code . Stel een breekpunt Klik ergens in het programma voor de "End Sub " en druk op " F9 " naar een breekpunt , dat uitvoering van het programma pauzeert ingesteld . in het Excel- werkblad de dalende kolom met getallen , dan terug naar uw programma in de IDE . Start het programma door op " F5 " en de mededeling van de gele markering , die aangeeft dat uw breekpunt code-uitvoering heeft gepauzeerd Verander het programma te sorteren met een afdaling , geen stijging: . Vervang de tekst "Order : = xlDescending " tekst met " Order : = xlAscending , " dan voorzichtig sleep de gele pijl , die laat zien wat statement volgende zal uitvoeren , terug naar een lijn voordat de code die u zojuist veranderd . Druk op "Control - Shift - F9 " om alle breekpunten te wissen , druk dan op " F5 " om uitvoering van het programma te beëindigen. Keer terug naar Excel om te controleren of uw code de kolom op te stijgen heeft gesorteerd .
|