VBA ( Visual Basic ) is gebouwd op de slimme observatie dat u de programmering tijd kunt besparen door het bouwen van macro's en het automatisch genereren van code van uw procedure . Het enorme voordeel is dat u voorkomen dat het schrijven geheimzinnige code en syntaxis . Dat bespaart tijd . U kunt VBA gebruiken om een macro die de benoemde bereiken zal krijgen van een Excel-werkblad en kopieer ze naar andere bladen in hetzelfde boek te creëren . Natuurlijk kunt u andere macro's die de benoemde bereiken zal krijgen en de gegevens op andere manieren te manipuleren . Instructies Met VBA aan de benoemde bereiken in Excel 1 Haal het menu Start , selecteer " Programma's " en vervolgens " Excel . " Kopen van 2 Maak een aantal test- tabellen die zullen worden in de benoemde bereiken . Ga eerst naar cel B2 en voer het nummer " 10 . " Hit Enter . Kopieer cel B2 met Ctrl - C . Houd de Shift-toets ingedrukt en druk op de pijl omlaag 8 maal , vervolgens op de pijl naar rechts 4 keer . Druk op Ctrl - V om te plakken . 3 Controleer om te zien of je een 9x5 tafel vol met tientallen . Naam 4 de reeks door het vinden van de Naam box in de linker bovenhoek - " . B2 " het is een klein , upside - down zwart driehoekje in de linkerhoek naast het vak dat moment leest Klik op het vak Naam en druk op Backspace te ontruimen . Voer het woord " . TableOne " Druk op " Enter ". 5 Ga naar cel B15 naar een tweede benoemd bereik te creëren . Type " 20 " en druk op " Enter ". Kopieer de cel B2 met Ctrl - C . Houd de Shift-toets ingedrukt en druk op de pijl omlaag 8 maal , vervolgens op de pijl naar rechts 4 keer . Druk op Ctrl - V om te plakken . Noem het bereik door opnieuw vinden van de Naam Box , er op te klikken , en wissen. Voer het woord " . TableTwo " Druk " Enter . " Klik op cel A1 om opnieuw te beginnen . 6 Maak een VBA macro om de benoemde bereiken krijgen door eerst Gereedschap . Selecteer vervolgens Macro . Selecteer vervolgens op Nieuwe macro opnemen . Druk op OK en accepteer de naam Macro1 , de macro zal de opname beginnen 7 Klik op de Omlaag driehoek in het vak Naam . . Selecteer " TableOne . " Druk op Ctrl - C om te kopiëren . Klik Blad 2 ( onderaan ) en ga naar G1 . Druk op Ctrl - V om te plakken . Druk Blad 1 . Nogmaals op de Omlaag driehoek in het vak Naam en selecteer TableTwo . Druk op Ctrl - C . Druk Blad 3 . Druk op Ctrl - V om te plakken . Druk op de blauwe vierkant in het vak Macro Opnemen. 8 Om het korte programma dat u hebt gemaakt te zien , selecteer Extra , Macro , Macro's , en Macro1 ( of de naam van uw macro ) . Klik op ' . Bewerken " Je code zou willen als dit: Sub Macro1 ( ) '' Macro1 Macro ' .... ' Application.Goto Referentie: = " TableOne " Selection.Copy Sheets ( " Blad2 " ) Selecteer Range ( " G1 " ) Selecteer ActiveSheet.Paste Sheets ( " Blad1 " ) Selecteer Application.Goto Referentie : . . . = " TableTwo " Application . CutCopyMode = Vals Selection.Copy Sheets ( " Blad3 " ) . Selecteer ActiveSheet.PasteEnd Sub 9 Voer de macro door terug te gaan naar de spreadsheet ( klik op de andere Excel- vak aan de pagina onderaan ) . Duidelijke Bladen 2 en 3 . Ga naar Blad 1 . Klik op 'Extra ', ' Macro ', ' Macro's , " en " Run . " Macro1 is gemarkeerd en het zal uitvoeren .
|