LEIYAZ
XLDnaute Nouveau
Bonjour a tous,
Je vous contactes aujourd'hui car j'ai un souci sur une macro me permettant de dupliquer une ligne préalablement filtrée sur le critère que j'aurais choisi sur la référence interne "numéro DPI" cf fichier joint.
Par exemple dans le fichier joint, je souhaites par exemple dupliquer la ligne C20 du "DPI2381"
J'avais déjà questionné dans un précédent forum pour dupliquer la ligne avec ce genre de code :
Et tout fonctionnait a merveille !! Mais depuis quelques temps, je suis confronté à une erreur :
Et voici la ligne qui pèche lors du débogage :
Je ne comprends pas pourquoi cela ne fonctionne pas...
Je vous joins le fichier, la macro se trouve dans le module "Dupliquer_Ligne_suivant_N°DPI".
Merci par avance pour votre aide toujours précieuse et passez de joyeuses fêtes !
Cordialement,
Je vous contactes aujourd'hui car j'ai un souci sur une macro me permettant de dupliquer une ligne préalablement filtrée sur le critère que j'aurais choisi sur la référence interne "numéro DPI" cf fichier joint.
Par exemple dans le fichier joint, je souhaites par exemple dupliquer la ligne C20 du "DPI2381"
J'avais déjà questionné dans un précédent forum pour dupliquer la ligne avec ce genre de code :
VB:
Sub Dupliquer_Ligne_suivant_N°DPI()
Dim Derlig As Long
Derlig = Range("B65536").End(xlUp).Row
Columns("F:G").EntireColumn.hidden = False
Range("C14:O" & Derlig).SpecialCells(xlCellTypeVisible).Copy Range("C" & Derlig + 1)
Columns("F:G").EntireColumn.hidden = True
End subEt tout fonctionnait a merveille !! Mais depuis quelques temps, je suis confronté à une erreur :
Et voici la ligne qui pèche lors du débogage :
Je ne comprends pas pourquoi cela ne fonctionne pas...
Je vous joins le fichier, la macro se trouve dans le module "Dupliquer_Ligne_suivant_N°DPI".
Merci par avance pour votre aide toujours précieuse et passez de joyeuses fêtes !
Cordialement,