Relire et Optimiser la macro créer clients

Bonjour,

réduire au plus juste le nombre de ligne à calculer
C'est ce que j'attendais, mais dans votre exemple y en a 199
Je modifie
A+

Re,
Si colonne H, suffit de supprimer les "clientxxx" de la colonne et vous n'aurez que ceux inscrits....!!

Fichier avec petite modif dans creation nouvelle feuille, mais rien dans creation client.
https://mon-partage.fr/f/RXa9kljg/
Comprends pas ou est le bleme.....!!

Bonjour

Merci de vous occuper de mon cas, je voulais savoir si ma façon de faire était la bonne
J'écris les macros avec l'enregistreur de macro et j'apporte des modifications que je glane par ci par là

'Recréer les clients suivant listes
Set Plage = Range("liste_client_actif")
nb = Application.CountIf(Plage, 1)
If nb > 0 Then
For nc = 1 To nb
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Activate
ActiveSheet.Paste
Next nc

d'où ma question

Re,
Le principe de votre code est la copie de formules par paquet de 8 lignes les en dessous des autres

Selection.End(xlDown).Select ' selection de la derniere cellule non vide de la feuille modele
ActiveCell.Offset(1, 0).Activate ' positionnement sur ligne trouvee précédemment +1 pour copi plage "ancre1"

Re,
Ok, salut