Bonjour à toutes et tous,
Je vous amène un nouveau problème.
Sur une première feuille "Bon de commande", j'ai une macro qui copie une ligne de donnée vers une autre feuille "BDD_order" en faisant une insertion de ligne en A2, afin que les dernières données copiées soient en premier.
Le problème est que sur une troisième feuille "Modification de commande" je fais une recherchev de ces données afin de modifié la commande sélectionnée et que ma recherchev qui est censée commencer en "A2", commence finalement en "A3" après l'insertion des données...
Après de nombreuse recherche je m'avoue presque vaincu ... Mais une petite idée me viens, faire un test de ligne vide et coller mes valeurs dans la première ligne vide trouvée. Problème, je ne trouve pas comment faire ce code ...
Mon code (aidé par Dan)
With Sheets("BDD_order")
.Range("A2:BU2").Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrBelow
Sheets("Bon de commande").Range("A2:AU2").Copy
.Range("A2").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone
End With
Application.CutCopyMode = False
Par avance merci à vous.
(pas de fichier a joindre par soucis de confidentialité ...)