texte sur graphique - VB/VBA/VBS - Programmation
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
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
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
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