Impression après mise à jour?

[romika]

Bonsoir le forum,

J'ai 1 petit souci avec un fichier excel qui me prends beaucoup de temps et j'espère que vous pourriez m'aider.

Je vous explique:

-dans la cellule A1 j'ai une liste déroulante avec 50 sociétés.
-sur la feuille il y a plusieures formules recherchev qui "tapent dans un deuxième onglet où les données sont en vrac et à chaque fois que je choisis une société dans la liste déroulante les cellules se mettent à jour en fonction de la société.
-j'ai besoin d'imprimer les résultats de chaque société ce qui fait que je dois aller choisir 50 fois la société et appuyer sur print ce qui me prends énormément de temps.
-et je voudrais donc trouver une solution pour imprimer tout à la fois.

Y a t il un moyen de faire ça?

Merci d'avance pour votre aide

 

[Coriolan]

Re : Impression après mise à jour?

Bonsoir,

Oui, il y a un moyen ...

En l'absence de fichier joint, je suppose qu'il y a une cellule liée à la liste qui renvoie le numéro de l'élément sélectionné de cette liste. Si cette cellule est A2:

Sub print-all

for i = 1 to 50
range("a2").value = i
Activeworkbook.calculate 'si on n'est pas en recalcul automatique
Activeworkbook.sheets(1).print 'si c'est bien le 1er onglet
next i

et voilà. Il suffit d'associer un bouton à cette macro.

 

[romika]

Re : Impression après mise à jour?

Bonjour Coriolan, le forum,

merci pour l'info, mais j'arrive pas à le faire fonctionner (il me sort une erreur).

voici un fichier exemple.

merci pour votre aide

 

[matthieu33]

Re : Impression après mise à jour?

Bonjour Romika,

Je te fournis une solution.

@+