impression d'une feuille excel contenant des label

[simon80]

Bonjour à tous,

Je rencontre un petit problème lors de l'impression d'une feuille excel contenant des label. En effet, certains label sont vides lors de la première impression. Il me faut alors demander une deuxième impression pour disposer de la totalité des informations.

Explication :
Dans ma feuille "base de données" (1), j'ai un bouton imprimer qui permet de chercher la ou les lignes à imprimer puis à charger leur contenu dans des labels de la feuille "impression" (2). Ensuite, j'active la feuille "impression" (2) pour l'imprimer.


extrait du code du bouton impression :

Code :

1
2
3
4
5
6
7
8
9
10
Worksheets(2).Label1.Caption = Worksheets(1).Range("I4").Offset(i, 0).Value
Worksheets(2).Label2.Caption = Worksheets(1).Range("J4").Offset(i, 0).Value
...
..
.
Worksheets(2).Visible = 1
Worksheets(2).Activate
Worksheets(2).PrintOut
Worksheets(1).Activate
Worksheets(2).Visible = 2

extrait du code de l'activation de la feuille impression :

Code :

1
2
3
4
5
Worksheets(2).Label1.Activate
Worksheets(2).Label2.Activate
...
..
.

Comme je l'ai expliqué, la totalité des informations ne se charge pas dans les labels lors de la première impression. Il faut en relancer une seconde pour que le problème disparaisse.

J'espère avoir été assez clair.

Merci d'avance à ceux qui voudront bien m'aider sur ce sujet,

Simon

[rtg57]

Bonjour,

je pense qu'il faut laisser le temps à EXCEL de rafraichir ses éléments graphiques.
Après avoir renseigné le contenu de vos label, ajoutez l'instruction DoEvents.
Ce que vous pouvez faire aussi, c'est l'inhibition du rafraichissement graphique avant de commencer à renseigner vos objets graphiques. L'instruction à employer est : Application.ScreenUpdating = false
Puis lorsque tout est fini, remettez l'affichage en service par : Application.ScreenUpdating = true

Je pense que tout cela devrait permettre à EXCEL d'afficher correctement les composants.