VBA sorteren of " Visual Basic for Applications " is de programmeertaal voor het schrijven van macro's ( functies ) in Excel -spreadsheet . Een VBA- macro biedt het voordeel van het automatiseren van repetitieve taken in een naadloze procedure die kan worden uitgevoerd op een klik van een muis , toetsaanslag of werkblad evenement . Instructies
schrijven van een VBA- macro
1 Selecteer " File | New " in Excel om een nieuwe werkmap te maken kopen van 2 Voer de waarden " vruchten ", " . Apple "," appel "," banaan "en " oranje " in de cellen A1 , A2 , A3 , A4 , A5 en .
3 Voer de waarden in " prijs , " " 1.5 , " " 1.4 "," 2 ", " 1.5 " in de cellen B1 , B2 , B3 , B4 en B5
4 Selecteer . 'Extra | Macro > Macro's ... " < br >
5 Voer de macro naam " sortFruitPrices " in het dialoogvenster Macro en selecteer "Create . "
Copy 6 en plak de volgende code onder de automatisch gegenereerde functie header " sub sortFruitPrices . " Merk op dat " _ " staat voor dezelfde lijn voortzetten , "Koptekst " is ingesteld op " xlYes ", zodat de titel rij niet is opgenomen in het sorteren en " MatchCase " is ingesteld op " True ", zodat de appel voorafgaat Apple ) . < Br > Cells.Sort _
Key1 : = Range ( " A1 " ) , Order1 : = xlAscending , _
Toets 2 : = Range ( " B1 " ) , Order2 : = xlAscending , _ Header
: = xlYes , OrderCustom : = 1 , MatchCase : = True , Orientation : . = xlSortColumns
Druk op " F5 " 7 om de macro uit te voeren
< br > Kies " File | Save " 8 en de macro op te slaan in :
installeren van een VBA- macro
Press 9 " C \\ Book1.xls . " " Alt + TAB " om van de VBA- editor om de Excel-spreadsheet
10 kiezen . " Gereedschap | Aanpassen ... " en klik op het tabblad " Commando's " in het dialoogvenster .
11 Selecteer " Macro's " uit de " Categorieën" lijst. Klik op " Aangepaste menu-item " uit de lijst "Opdrachten" , sleep het over de optie "Tools" in het hoofdmenu zodat het menu automatisch wordt geopend , laat het dan onder het laatste item .
12 klik met de rechtermuisknop op 'Extra | Customer menu-item " en de naam item te " sorteren & FruitPrices , " en druk op " Enter ".
13 klik met de rechtermuisknop op' Extra | sortFruitPrices " en selecteer " Macro toewijzen ... " . Selecteer sortFruitPrices uit de macro- lijst en klik op "OK . " Sluit het dialoogvenster Aanpassen
14 Opslaan . . ' C : \\ Book1.xls "
15 Verander de waarde " Apple " tot " pineapple " en selecteer " Extra | . . sortFruitPrices '
toevoegen Automatisch sorteren
Klik 16 op de " Sheet1 " tab aan de onderkant van het werkblad en selecteer " View Code "
< br > 17 Klik op het object lijst boven de ruit broncode waar het toont " ( General ) " en selecteer " werkblad . "
18 Selecteer " Change" van de "Evenementen " lijst . naast de " Objects " lijst
19 Kopieer en plak de volgende code onder de automatisch gegenereerde functie header " Private Sub Worksheet_Change : "
Als Target.Column = 1 dan Call sortFruitPrices End
Als
20 Druk " Alt + TAB " om van de VBA- editor om de Excel-spreadsheet .
21 opslaan . " C : . \\ Book1.xls "
22 Change " appel aan " dessert appel " en druk op" Enter " Merk op dat het werkblad automatisch sorteert zelf
< br . >
|
