[resolu par phlaurent 55] imprimer par userform

[bahnini mohamed]

saltu j'ai cette fichier ou je peut imprimer une serie des clients en entrant le numero de premiere client et de drernier
sa marche tres bien
le probleme et si j'ai par exemple une serie des clients de 1 à 10 et je n'est pas un client avec le numero 3 l'impression donne le clients qui à le numero 3 mais avec des donné faux
comment je peut faire pour ne pas imprimer le numero qui n'existe pas dans la plage des clients
merci
bonne soirée

 

[bahnini mohamed]

Re : imprimer par userform

aidez moi svp

 

[phlaurent55]

Re : imprimer par userform

Bonjour,

en modifiant comme ceci:

With Sheets("Facture") 'prend en compte l'onglet "Facture"
    For i = d To f 'boucle du début à la fin
    For j = 2 To 10
    If Sheets("Clients").Cells(j, 1).Value = i Then
        .Range("C8").Value = i 'renseigne la cellule C8
        .PrintOut Copies:=1, Collate:=True 'imprime l'onglet
    End If
    Next j
    Next i 'prochain client de la boucle
End With 'fin de la prise en compte de l'onglet "Facture"

il te reste à adapter la ligne For j = 2 To 10 en fonction du nombre de lignes dans la feuille

à+
Philippe

 

[bahnini mohamed]

Re : imprimer par userform

merci je vais essai

 

[bahnini mohamed]

Re : imprimer par userform

Merci ca marche tres bien
bonne soiree