texte sur graphique

texte sur graphique - VB/VBA/VBS - Programmation

Marsh Posté le 04-05-2006 à 15:54:14    

dc comme vous savez je genere des graphique, et j'aimerai savoir comment y mettre des champs texte correspondant a des selection faites sur des ListBox
pour avoir du genre graphique truc machin, echelle de temps machin ...
 
 
merci :)

Reply

Marsh Posté le 04-05-2006 à 15:54:14   

Reply

Marsh Posté le 04-05-2006 à 22:23:58    

Bonsoir GillooZ
Bonsoir  à tous
 
Dans un graph tu peux ajouter un titre par :  
    With ActiveChart
        .HasTitle = True
        .ChartTitle.Characters.Text = "toto"
        .Axes(xlCategory, xlPrimary).HasTitle = False
        .Axes(xlValue, xlPrimary).HasTitle = False
    End With
 
Excuse le "toto" mais j'aime bien
Puisque je t'entend dire que ce n'est pas assez ;-) tu peux ajouter des champs Texte avec l'icône "zone de texte" de la barre d'outil dessin. Après ces ajouts font partie intégrante du graph, cad que l'on peut le redimensionner, le déplacer,... les textes suivent. Le code peut être :
 
.....
.....
    ActiveChart.Shapes.AddTextbox(msoTextOrientationHorizontal, 8.25, 9#, 89.25 _
        , 21.75).Select
    Selection.Characters.Text = "titi"
.....
.....
.....
 
Cette fois ci c'est "titi"   ;-)
 
Cordialement

Reply

Marsh Posté le 05-05-2006 à 09:22:50    

merci beaucoup ca fonctionne parfaitement, tu aurais pu utiliser aussi alice et bob, les bons vieux potes de crypto ^^
le forum hardware.fr est grand, Gilles gros paquets le confirme

Reply

Marsh Posté le 09-05-2006 à 09:03:51    

pour les textes peut on mettre la valeur d'une Listbox  
par exemple peut on faire  
Selection.Characters.Text = ListBox1.Value  
?
merci :)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed