VBA copier coller

Bonsoir le forum,

Une petite aide serait la bienvenue. Je cherche en effet à automatiser une copie de ligne vers une autre. Je m'explique:

Je souhaite que lorsque ma cellule F4 change, la macro copie les cellules C4 à D4 et colle le contenu dans la dernière ligne du second tableau (produit 2). Pour une cellule cible ça va, mais j'aimerai que cette macro fonctionne pour chaque cellules de la colonne F (c'est à dire F4,F5,F6,F9,F10,F11,F14,F15 et F16) et qu'elle copie les cellules C à D en face de la cellule F modifiée.

J'ai vu que c'était une notion d'offset mais pour l'automatiser pour chaque cellules de F je ne vois pas.

Merci d'avance de votre aide.

Cordialement,

Corsaire

Bonsoir,

si j'ai bien compris ce que tu voulais, ... solution en PJ

Bonsoir,

J'ai réussi à trouver une solution à mon problème après plusieurs heures !

'Sélection de ma cellule à copier en face de la cellule F modifiée
ActiveCell.Offset(0, -3).Select
Range(ActiveCell, ActiveCell.Offset(0, 1)).Select
Selection.Copy

If ListBox1.Value = "ProduitA" Then
Worksheets("Feuil1").Range("C11").End(xlUp).Select 
ActiveCell.Offset(1, 0).Select
ActiveCell.PasteSpecial

Merci de ton aide.

Cordialement,

corsaire