A
adidu44
Guest
Bonjour,
Je reviens vers vous avec deux problèmes qui sont liés.
J'ai une macro qui copie la dernière ligne saisie et la colle là où je lui ai spécifié :
Mais j'aimerai qu'elle continue de copier la dernière ligne mais qu'elle inspecte les lignes de dessus voir si elles ne comportent pas les mêmes numéros de commande (cf : pièce jointe).
Si les numéros de commande sont identiques au dernier saisi, il faudrait qu'elle copie toutes les lignes correspondantes.
Le second problème est que sur la deuxième feuille, je n'ai qu'une ligne d'arrivée par défaut.
Est il possible d'insérer autant de ligne que le nombre copié ?
Je préfère joindre un fichier car je ne sais pas si je me suis bien exprimé.
Cordialement,
Adidu44
Je reviens vers vous avec deux problèmes qui sont liés.
J'ai une macro qui copie la dernière ligne saisie et la colle là où je lui ai spécifié :
Code:
Sub Bouton15_Cliquer()
Dim c As Range, Dest As Variant
Dest = Array("B5", "C5", "C5", "D5")
NbColonnes = 4
Set c = Range("A" & [A65536].End(xlUp).Row).Resize(1, NbColonnes)
For t = 1 To NbColonnes
c.Cells(t).Copy Destination:=Workbooks("Exemple.xlsm").Sheets("Feuil2").Range(Dest(t - 1))
Next t
End Sub
Si les numéros de commande sont identiques au dernier saisi, il faudrait qu'elle copie toutes les lignes correspondantes.
Le second problème est que sur la deuxième feuille, je n'ai qu'une ligne d'arrivée par défaut.
Est il possible d'insérer autant de ligne que le nombre copié ?
Je préfère joindre un fichier car je ne sais pas si je me suis bien exprimé.
Cordialement,
Adidu44