Microsoft Visual Basic er et programmeringssprog, der anvendes til at udvide funktionaliteten i Microsoft Word og Excel. Kodning Visual Basic -projekter , der udfører vigtige Excel opgaver vil lære dig , hvordan du bruger Visual Basic til at øge din Excel produktivitet. Opret Data
Dette projekt summerer tallene i en række over den aktive celle , ind i sum i den aktive celle. Til at begynde dette projekt , skal du oprette data for det - tallene skal summeres . I et Excel-regneark , indtaste fem tal i en kolonne. Marker den første tomme celle under kolonnen af tal.
Nu oprette Visual Basic program, der vil opsummere disse numre.
Indtaste koden i udviklingsmiljøet
< br >
Indtast Visual Basic integrerede udviklingsmiljø (IDE ) ved at trykke Alt- F11 . I kodevinduet , indtaste denne funktion : Hej
Sub Macro1 ()
Dim s Som StringDim o Som RangeDim p Som Range
Set o = ActiveCell.Offset (-1 ) Set p = o.End ( xlUp ) Set q = Range ( o , p)
s = " = gennemsnit ( " & q.Address & " ) "
ActiveCell.Formula = s
End Sub
Denne programkode svarer til manuelt at indtaste følgende tekst i den celle, du valgte tidligere: "= sum ( ) ", hvor refererer til kolonnen af numre, du har indtastet.
Kør makroen ved at vende tilbage til Excel-regnearket , vælge Developer > Makroer , vælge Macro1 og trykke på knappen Kør . Makroen summerer kolonnen af tal , ind i resultatet i den aktuelt aktiverede celle. (Hvis du ikke kan se fanen Udvikler udsætte det ved at vælge Office-knappen i Excel øverste venstre hjørne , vælge Excel-indstillinger, og " Vis fanen Udvikler på båndet ").
< Br > Projekt Two : Brug en formular
det andet projekt bygger videre på den første ved at lade brugeren af dit program et udvalg af funktioner
Indtast det Visual Basic IDE og vælge. Indsæt> UserForm . Træk følgende kontroller på formularen fra værktøjskassen : en listbox og en knap . Tryk på F7 for at vende tilbage til den kode visningen og vælge UserForm fra venstre drop- down boksen i den øverste del af koden vinduet, og Initialiser fra højre drop- down boks . IDE-enheden opretter funktionen Sub UserForm_Initialize (). I denne funktion , skal du indtaste denne kode, som tilføjer til listbox navnene på de funktioner, som brugeren vælger fra : Hej
ListBox1.AddItem " sum" ListBox1.AddItem " gennemsnitlig "
Brug kode vinduets venstre og højre drop- down bokse igen , vælge CommandButton1 fra venstre drop- down , og klik på højre drop- down boks . IDE skaber tomme funktion CommandButton1_Click ( ) . Indtast følgende kode i denne funktion, som vil kalde den oprindelige Macro1 du skrev med den funktion, som brugeren vælger fra listbox : Hej
Macro1 ( ListBox1.Value )
Rediger Macro1 til at acceptere en argument: Højreklik på " Macro1 " tekst, og vælg definition at navigere til Macro1 definition. Skift linjen " Sub Macro1 ()" til at læse "Sub Macro1 ( funk As String ) "
Nu hvor du har tilføjet det argument , ændre Macro1 at bruge det : ændre erklæringen s = "= gennemsnit ( "& q.Address &" ) " til følgende ordlyd : Hej
s = " = "& funk &" ( "& q.Address &" ) "
Skriv funktion som indlæser Form
Indtast dette nye funktion under Macro1 : Hej
Sub Macro2 () UserForm1.ShowEnd Sub
Retur til Excel ( alt - F11) og flytte markøren under talkolonnen . Vise UserForm ved at vælge Developer > Makroer og vælge Macro2 og køre. Når formularen vises, vælg enten sum eller gennemsnit funktion og tryk på knappen. Dit program vil indtaste formlen i regnearket. Formlen opsummerer data fra kolonnen over den aktive celle .