Imprimer USERFORM

[jibdu64]

Bonjour,

j'ai un userform qui s'alimente par les données présentes sur une feuille.
Jusque là pas de problème.
Ces données sont mise en forme dans l'Userform, et une barre de défilement est activé sur la droite car le nombre de ligne est grand.

Je crée un bouton Imprimer auquel j'affecte le code suivant :


Private Sub CommandButton1_Click()
Me.Height = Me.ScrollHeight 'retire la barre de defilement a gauche et etend l'userform a sa taille réelle pour l'impression
CommandButton1.Visible = False 'rend invisible le bouton imprimer lors de l'impression
CommandButton2.Visible = False 'rend invisible le bouton retour lors de l'impression
Me.PrintForm

Unload Me
End Sub




Lorsque j'imprime, une seule feuille sors de l'imprimante avec les données remplies jusqu'en bas de la feuille..
Mon probleme c'est que toutes les données ne sont pas présente.. En effet, la 2éme page avec la suite des données ne s'imprime pas..

J'espère avoir été clair dans l'énoncé de mon Problème..
Cordialement

 

[herve62]

Re : Imprimer USERFORM

Essaye d'ajouter "preview" pour vérifier avant ce qu'elle va te sortir comme ça tu sera fixé d'ou
ca vient

 

[jibdu64]

Re : Imprimer USERFORM

C-a-d ?
j'ai rajouté preview= true

mais rien ne se passe de plus ..

 

[jibdu64]

Re : Imprimer USERFORM

Personne pour m'aider ..