VBA ( Visual Basic ) är byggd på den smarta observationen att du kan spara programmering tid genom att bygga makron och automatiskt generera kod från din procedur . Den enorma fördelen är att du slipper skriva svårbegripliga kod och syntax . Det sparar tid . Du kan använda VBA för att skapa ett makro som kommer att få de namngivna områden från ett Excel-kalkylblad och kopiera dem till andra blad i samma bok . Naturligtvis kan du skapa andra makron som kommer att få de namngivna områden och manipulera data på andra sätt . Instruktioner
Använda VBA för att få de namngivna områden i Excel
1
på Start-menyn , välj " Program " och sedan " Excel ".
2
Skapa några tester tabeller som kommer att vara i namngivna områden . Först , gå till cell B2 och ange numret " 10 . " Hit Enter . Kopiera cell B2 med Ctrl - C . Håll Skift-tangenten och trycker på nedåtpilen 8 gånger , tryck sedan på den högra pilen 4 gånger . Tryck på Ctrl - V för att klistra in .
3
Kontrollera om du har en 9x5 tabell full av tior .
4
Namn intervallet genom att hitta namn rutan i det övre vänstra hörnet - " . B2 " det är en liten , uppochnervänd svart triangel i vänstra hörnet bredvid rutan som läser för närvarande Klicka på namnrutan och tryck på backsteg för att radera . Skriv ordet " TableOne . " Tryck på " Enter ".
5
Gå till cell B15 för att skapa en andra namngivet område . Skriv " 20 " och tryck på " Enter . " Kopiera cell B2 med Ctrl - C . Håll Skift-tangenten och trycker på nedåtpilen 8 gånger , tryck sedan på högerpilen 4 gånger . Tryck på Ctrl - V för att klistra in . Namnge området genom att återigen hitta namnrutan , klicka på den och rensa den . Skriv ordet " TableTwo . " Tryck på " Enter ". Klicka på cell A1 för att börja igen .
6
Skapa en VBA-makro för att få de namngivna områden genom att först markera Verktyg . Välj sedan Macro . Välj sedan Spela in nytt makro . Tryck på OK och acceptera namnet Makro1 , makrot börjar inspelningen
7
Klicka på Down triangeln i rutan Namn . . Välj " TableOne . " Tryck på Ctrl - C för att kopiera . Klicka på blad 2 ( botten ) och gå till G1 . Tryck på Ctrl - V för att klistra in . Tryck Sheet 1 . Återigen klicka på Ned triangeln i rutan Namn och välj TableTwo . Tryck på Ctrl - C . Tryck blad 3 . Tryck på Ctrl - V för att klistra in . Tryck på den blåa fyrkanten i Spela in makro rutan .
8
att se det korta programmet du har skapat väljer du Verktyg , Makro , Makron , och Makro1 ( eller namnet på ditt makro ) . Klicka " . Redigera " Din kod skulle vilja så här :
Sub Makro1 ( ) '' Makro1 Macro ' .... " Application.Goto Referens : = " TableOne " Selection.Copy Sheets ( " Blad2 " ) Välj Range ( " G1 " ) Välj ActiveSheet.Paste Sheets ( " Blad1 " ) Välj Application.Goto Referens : . . . = " TableTwo " Application . CutCopyMode = false Selection.Copy Sheets ( " Sheet3 " ) . Välj ActiveSheet.PasteEnd Sub
9
Kör makrot genom att gå tillbaka till kalkylbladet ( klicka på den andra Excel- rutan på sidan längst ned ) . Tydliga blad 2 och 3 . Gå till blad 1 . Klicka på " Verktyg ", " Makro ", " Makron " och "Kör". Makro1 markeras och det kommer att utföra .
