N
nicolas
Guest
Bonjour à vous tous sur ce forum.
Je bute sur un petit probleme:
J'affiche dans ma userform-multipage un graphique par code VBA. J'ai créé un bouton Print pour pouvoir l'imprimer. Mais il ne marche pas ... Il ne s'affiche aucun message d'erreur, mais rien ne se passe...
Voila la commande que j'ai écrite:
Private Sub CBPrint_Click()
Dim objcht As ChartObject
Dim cht4 As Chart
For Each objcht In ActiveSheet.ChartObjects
Set cht4 = objcht.Chart
'Debug.Print cht4.Name, objcht.Name
cht4.PrintOut
Next
End Sub
Merci pour vos suggestions.
Nicolas
Je bute sur un petit probleme:
J'affiche dans ma userform-multipage un graphique par code VBA. J'ai créé un bouton Print pour pouvoir l'imprimer. Mais il ne marche pas ... Il ne s'affiche aucun message d'erreur, mais rien ne se passe...
Voila la commande que j'ai écrite:
Private Sub CBPrint_Click()
Dim objcht As ChartObject
Dim cht4 As Chart
For Each objcht In ActiveSheet.ChartObjects
Set cht4 = objcht.Chart
'Debug.Print cht4.Name, objcht.Name
cht4.PrintOut
Next
End Sub
Merci pour vos suggestions.
Nicolas