XL 2016 PROGRAMMATION D'UNE BOUCLE POUR IMPRESSION FEUILLE EXCEL

01passepasse · 14 Mars 2017

Bonjour à tous

je voudrais imprimer la feuil1 en faisant apparaitre dans la cellule A2, le nom des salariés présents dans la colonne A de la feuil2 ; si par exemple, 10 noms différents dans la colonne A de la feuil 2 (ex : salarié 1 ; salarié 2 ; salarié 3 ...), je voudrais avoir 10 impressions de la feuil1 avec à chaque fois, le nom de chaque salarié dans la cellule A2 de la feuil1 (==> Impression 1 = Salarié 1 ; Impression 2 = Salarié 2 ...)

Ps : la liste des salariés pourra s'allonger ou diminuer avec le temps

Merci d'avance de votre collaboration

JCGL · 14 Mars 2017

Bonjour à tous,

Peux-tu essayer avec ceci :

Code:

Sub Imprime()

    Dim Lig&
    For Lig = 1 To Feuil2.Range("A" & Rows.Count).End(xlUp).Row
        Feuil1.Range("A2") = Feuil2.Range("A" & Lig)
        Feuil1.PrintPreview
    Next Lig
End Sub

A+ à tous

01passepasse · 15 Mars 2017

Bonjour JCGL
Désolé pour le temps de latence pour la réponse ; Parfait ça fonctionne
Merci beaucoup

XL 2016 PROGRAMMATION D'UNE BOUCLE POUR IMPRESSION FEUILLE EXCEL

01passepasse

Guest

JCGL

XLDnaute Barbatruc

01passepasse

Guest

Discussions similaires

XL 2016 PROGRAMMATION D'UNE BOUCLE POUR IMPRESSION FEUILLE EXCEL

01passepasse

Guest

JCGL

XLDnaute Barbatruc

01passepasse

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency