Kraften i Visual Basic är förmågan att skapa automatiska rutiner helt enkelt genom att spela in dem på ditt kalkylblad . Till exempel , om du vill hämta värdet för en cell på Visual Basic , kan du skapa en enkel procedur och spela in det som ett makro . Du kan senare köra makrot för att automatiskt göra det arbete du annars skulle göra manuellt via tangentbordet . Ännu mer kraftfull är nästa steg : Att skapa andra förfaranden som kan använda proceduren du precis har skapat . Fast det kommer förmodligen att bli nödvändigt att så småningom skriva lite kod i Visual Basic Editor , kan du spara mycket tid genom att låta datorn generera koden . Saker du behöver
Microsoft Excel VBA
Visa fler instruktioner
Komma Value med enkel Copy
1
Gå till cell A4 i ett nytt Excel-kalkylblad och Ange " 10 . " Klicka på " Verktyg ", välj " Macro " och välj " Spela in nytt makro . " Ange " Makro1 " för Macro namn . Klicka på " OK . "
2
Klicka cell " A4 . " Håll " Ctrl " -tangenten och tryck på " C " Tryck på den blå fyrkanten under ordet Stopp på popup-panelen för att sluta spela in makrot .
3
Titta på koden som du har skapat genom att klicka på " Verktyg ", " Macro , " och " Makron . " Klicka på " Redigera ". Bekräfta att koden ser ut ungefär så här : .
Sub Makro1 ( ) '' Makro1 Makro '' Range ( " A4 " ) SelectSelection.CopyEnd Sub
få värdet med hjälp en cellreferens
4
Starta en ny Excel- arbetsbok genom att välja " nytt " från Arkiv -menyn . Gå till cell A3 och skriv in " 15 . " Klicka på " Verktyg ", välj " Macro " och välj " Spela in nytt makro . " Ange " Makro2 " för Macro namn . Klicka på " OK . "
5
Klicka på cell " A4 . " Typ " = A3 " och tryck på " Enter ". Tryck på den blå fyrkanten under ordet " Stop " på popup-panelen för att sluta spela in makrot .
6
Titta på koden som du har skapat genom att klicka på " Verktyg ", " Macro " och " makron ". Välj " Makro2 " och klicka på " Redigera ". Bekräfta att koden ser ut ungefär så här : .
Sub Makro2 ( ) '' Makro2 Makro '' Range ( " A4 " ) SelectActiveCell.FormulaR1C1 = " = R [ -1 ] C " Range ( " A5 " ) . SelectEnd Sub
