Impression VBA macros-zones spécifiques-conditions

Bonjour à tous,

Il s'agit de mon premier message, je vais essayer d'être le plus clair possible.

En annexe vous trouverez le fichier concerné, pour une meilleure compréhension.

Je suis à la recherche d'une macro permettant d'imprimer une zone d'impression avec une condition.

Me référent au fichier joint:

Sous l'onglet "analyses_echantillons_enrobes", j'aimerais que la future macro m'imprime la zone B1-W41 si A2=1

et ainsi de suite, c'est à dire:

A1=1 alors Impression B1-W41

A44=2 alors Impression B43-W83

A590=15 alors Impression B589-W629

Je peux avoir que 15 tableaux à imprimer max (limite de mon Programme)

mais il se peut que j'ai entre 1 à 15 tableaux à imprimer:

A1=1 alors Impression B1-W41

A44=2 alors Impression B43-W83

A86=-

ce qui ce fait 2 tableaux à imprimer.

Si cela vous s'implifie de passer par la création d'un PDF, no soucis.

Cela fait quelque temps que je traine dessus, mais rien trouver

En espèrant trouver une solution à mon problème.

Merci d'avance pour votre Aide.

Benjy08

Bonjour,

Ci-joint une proposition à tester :

bouton "IMPRIMER"

> imprime un tableau par page

> s'arrête quand on trouve un #REF en colonne "A" de l'onglet "analyses_..." (condition à revoir éventuellement avec le vrai fichier)

Bonne journée

Bouben

Bonjour Bouben,

Sur mon fichier original, l'impression doit se terminer au moment où il y a un "-" dans la colonne A et non un #REF.

Je ne vois pas comment l'insérer dans ta macro.

Sinon la macro, elle fonctionne sur mon fichier original.

Merci pour ton aide.

Bonne journée

Benjy08

Voici la ligne à remplacer pour indiquer la fin d'impression :

        'If IsError(vPage) Then   'cellule en erreur => fin
        If CStr(vPage) = "-" Then

Bouben

Re Bouben,

Merci cela fonctionne merveilleusement bien!

bonne journée

Benjy08