Graphique camembert
De zBasic
Objectif
Sur la feuille1 et à partir des données de la plage A1:B3, créer un graphique en secteur.
Code
Sub Cree_Camembert GlobalScope.BasicLibraries.loadLibrary ("zBasic") Dim sGraph as variant sGraph = zGraph.Demarre("Test", "Feuille1", "A1:B3") zGraph.Modele(sGraph, "Secteur", "Normal") zGraph.Propriete(sGraph, "Titre", "Planning") zGraph.Propriete(sGraph, "Largeur", "10000") zGraph.Termine(sGraph, "Feuille1", "B5") End sub