Visual Basic diagram kan enkelt skapas som ett makro med hjälp av Microsoft Excel . Makron är en uppsättning instruktioner som du kan gruppera ihop för att snabbt utföra en uppgift . Excel har en inbyggd Visual Basic Editor som kan användas för detta ändamål . Skapa diagram i Visual Basic kräver att du kod i Visual Basic språket . Instruktioner
1
Klicka på "Start ", peka på " Alla program " och klicka sedan på " Microsoft Excel . "
2
Skriv följande utan citationstecken på Microsoft Excel- arket som öppnas :
" C3 : " " D3 : Region 1 " " E3 : Region 2 " " F3 : Region 3 "
" C4 : jan " " D4 : 10 " " E4 : 80 " " F4 : 15 "
" C5 : Feb " " D5 : 20 " " E5 : 70 " " F5 : 25 & rdquo ;
" C6 : mar " " D6 : 30 " " E6 : 60 " " F6 : 35 "
" C7 : Apr " " D7 : 40 " & ldquo , E7 : 50 " " F7 : 45 "
Varje värde visas här inom citationstecken ska komma i sin egen cell i den ordning som visas utan citationstecken . Till exempel kommer C3 kommer i en cell , C4 : Jan kommer i cellen nedanför C3, D3: kommer Region 1 komma i cellen intill C3 och så vidare. Samtliga C-värden bör komma i en kolumn . Likaså bör D , E , och F -värden kommer i deras enskilda kolumner .
3
Klicka på " Verktyg " -menyn i Excel- fönstret , peka på " Makro " och klicka sedan på " Visual Basic Editor . "
4
Klicka på " Infoga " -menyn på Visual Basic Editor-fönstret som öppnas och klicka sedan på " modul . "
5
Skriv följande kod exakt som det visas här på modulbladet som öppnas :
Sub CreateChart ( ) katalog
Charts.Add
ActiveChart.ChartType = xlColumnClustered
ActiveChart.SetSourceData _
Källa : = Sheets ( " Blad1 " ) Range ( " C3 " ) CurrentRegion , _
PlotBy : . . = xlColumns
End sub
6
Klicka på " Arkiv " -menyn i Excel och klicka sedan på " Spara som . "
7
Navigera till den plats på datorn där du vill att spara Excel-ark på Spara som dialogrutan som öppnas, skriv ett namn i " Filnamn " rutan ( till exempel " myvbchart " ) och klicka på " Spara ".
8
Klicka på " Verktyg " -menyn , peka på " Makro " och klicka sedan på " Makron . "
9
Klicka " CreateChart " på Makron dialogrutan som öppnas och klicka sedan på " Kör . " Addera