Affichage écran (simple aussi! :) )

[moi]

bonjour,
je rentre dans A1 de 20 feuilles de mon classeur la date du jour par VB au lancement de ce dernier

y a t il une possibilté de bloquer l'affichage de l'écran afin que je ne vois pas les 20 feuilles défiler sous ces yeux pendant 5 sec certes mais c'est inutile !!!

merci

 

[Ti]

tu mets :
Application.ScreenUpdating = False
en début de procédure et tu rétablis à True en fin de procédure

 

[STéphane]

bonjour



ceci copie la valeur de A1 provenant de la feuille Feuil5 dans la cellule A1 des autres feuilles
x = Array("Feuil1", "Feuil5", "Feuil7")
Sheets(x).FillAcrossSheets _
Worksheets("Feuil5").Range("A1") 'il faut copier les valeurs d'une des feuilles concernées


autre exempe ici : <http://xlbysteph.free.fr/aideinformatique/actioncellule.htm>

bye
stephane