Visual Basic diagrammer kan enkelt opprettes som en makro ved hjelp av Microsoft Excel. Makroer er et sett med instruksjoner som du kan gruppere sammen for å raskt utføre en oppgave. Excel har en innebygd Visual Basic Editor som kan brukes til dette formålet . Opprette diagrammer i Visual Basic krever at du kode i Visual Basic språket . Instruksjoner
en
Klikk "Start ", pek på " Alle programmer " og deretter "Microsoft Excel ".
2
Skriv inn følgende uten anførselstegn på Microsoft Excel-ark som åpnes : en
" 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 "
Hver verdi vist her innenfor anførselstegnene skal komme i sin individuelle celle i den rekkefølgen som vises uten anførselstegn . For eksempel vil C3 komme i en celle , C4 : Jan vil komme i cellen under C3 , D3 : Region 1 vil komme i cellen tilstøtende til C3 og så videre. Alle C-verdier bør komme i en kolonne. Likeledes bør D , E og F verdier kommer i sine individuelle kolonner .
3
Klikk på " Verktøy"- menyen på Excel -vinduet, velg "Macro ", og klikk deretter " Visual Basic Editor . "
4
Klikk på " Insert"-menyen på Visual Basic Editor vinduet som åpnes og klikk deretter på " Module ".
5 < p> Skriv inn følgende kode nøyaktig som vist her på modularket som åpnes : en
Sub CreateChart ( )
Charts.Add
ActiveChart.ChartType = xlColumnClustered
ActiveChart.SetSourceData _
Kilde : = Sheets ( " Ark1 ") Range ( " C3 ") CurrentRegion , _
PlotBy : . . = xlColumns
End sub
6
Klikk på "File "-menyen på Excel og deretter " Lagre som".
7
Naviger til plasseringen på datamaskinen der du vil for å lagre denne Excel-ark på Lagre som dialogboksen som åpnes, skriv inn et navn i " File name "-boksen (for eksempel " myvbchart ") og deretter " Lagre".
8 < p> Klikk på " Verktøy"-menyen , velg "Macro " og deretter " Makroer ".
9
Klikk " CreateChart " på dialogboksen Makroer som åpnes og klikk deretter "Kjør".