Visual Basic-projekt

Microsoft Visual Basic är ett programmeringsspråk som används för att utöka funktionerna i Microsoft Word och Excel . Kodning Visual Basic-projekt som utför viktiga Excel arbetsuppgifter kommer att lära dig hur man använder Visual Basic för att öka din Excel produktivitet . Skapa Data

Detta projekt summerar talen i en rad ovanför den aktiva cellen , in summan i den aktiva cellen . Till att börja detta projekt , skapa data för det - de nummer som skall summeras . I ett Excel-kalkylblad , ange några fem siffror i en kolumn . Markera den första tomma cellen under kolumnen med siffror .

Nu , skapa Visual Basic -program som kommer att sammanfatta dessa siffror .
Ange koden i utvecklingsmiljön

Ange Visual Basic integrerad utvecklingsmiljö ( IDE ) genom att trycka på Alt - F11 . I koden fönstret , skriv in denna funktion :

Sub Makro1 ( ) katalog

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 ) katalog

s = " = medelvärde ( " & q.Address & " ) "

ActiveCell.Formula = s

End Sub

programkod motsvarar manuellt mata in följande text i den cell du markerade tidigare : " = sum ( ) , " där hänvisar till sifferkolumnen du angett .

Kör makrot genom att återvända till Excel-kalkylbladet , markera Developer > Makron , markera Makro1 , och trycka på knappen Kör . Din makro summerar kolumnen med tal , ange resultatet i den nu aktiverade cellen . ( Om du inte ser fliken Utvecklare , avslöja det genom att välja Office -knappen i Excel övre vänstra hörnet , väljer Excel-alternativ , och " Visa fliken Utvecklare i menyfliksområdet . " ) Addera
projekt två: Använd ett formulär

andra projektet bygger på det första genom att tillåta användaren av ditt program ett urval av funktioner

Ange den Visual Basic IDE och välj . infoga > UserForm . Dra följande kontroller på blanketten från Toolbox : en listbox och en knapp . Tryck F7 för att återgå till kod vyn och välj UserForm från vänster listrutan i den övre delen av koden fönstret , och initiera från höger listrutan . IDE skapar funktionen Sub UserForm_Initialize ( ) . I denna funktion , ange den här koden , som läggs till i listrutan namnen på de funktioner användaren välja mellan :

ListBox1.AddItem " sum " ListBox1.AddItem " genomsnittliga "

Använd kod fönstrets vänstra och högra listrutorna återigen välja CommandButton1 från vänstra rullistan , och klicka från den högra listrutan . IDE skapar den tomma funktion CommandButton1_Click ( ) . Skriv följande kod i den funktionen , som kommer att kalla den ursprungliga Makro1 du skrev med den funktion som användaren väljer i listrutan :

Makro1 ( ListBox1.Value ) katalog

Ändra Makro1 att acceptera en argument : Högerklicka på " Makro1 " text och välj definition för att navigera till Makro1 definition . Ändra raden " Sub Makro1 ( ) " att läsa " Sub Makro1 ( funk As String ) "

Nu när du har lagt till argumentet , modifiera Makro1 att använda det : ändra uttalandet s = " = medelvärde ( " & q.Address & " ) " med följande lydelse :

s = " = " & funk & " ( " & q.Address & " ) " Addera Skriv funktion som laddar Form

Ange här nya funktionen nedan Makro1 :

Sub Makro2 ( ) UserForm1.ShowEnd Sub

Återgå till Excel ( alt - F11 ) och flytta markören under kolumnen med siffror . Visa UserForm genom att välja Developer > Makron och välja Makro2 och Run . När formuläret visas väljer antingen summan eller genomsnittet funktion och tryck på knappen . Ditt program kommer in formeln i kalkylbladet . Formeln sammanfattas de uppgifter från kolumnen ovanför den aktiva cellen .