Macro VB - Répéter une macro

Bonjour,

Je débute en macro et c'est la prise de tête!

Ce que je veux obtenir :

Feuille 1 : J'ai 1 tableau "planning" et feuille 2, une fiche.

Je veux qu'a chaque fois que je change de ligne et que je lance la macro, les info des cellules B/E/F/G selon la ligne sélectionnée se reporte sur la fiche.

Si je suis sur la cellule A2:
Je lance la macro :
Feuille 1 (D2) copier/coller sur Feuille 2 (F5)
Feuille 1 (F2) copier/coller sur Feuille 2 ( G9) ...

Et lorsque je change de ligne, je vais sur A4 par exemple :
je lance la macro et je devrais obtenir ceci :
Feuille 1 (D4) copier/coller sur Feuille 2 (F5)
Feuille 1 (F4) copier/coller sur Feuille 2 ( G9)

Je n'ai que la première étape, mais comment réaliser une boucle en fonction du changement de ligne.

Range("B2").Select
Selection.Copy
Sheets("Expédition").Select
Range("F3").Select
ActiveSheet.Paste
Sheets("planning").Select
Range("E2").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Expédition").Select
Range("B6").Select
ActiveSheet.Paste
Sheets("planning").Select
Range("F2").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Expédition").Select
Range("C6").Select
ActiveSheet.Paste
Range("B3").Select
Sheets("planning").Select
Range("G2").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Expédition").Select
ActiveSheet.Paste
End Sub

Merci de votre aide.
Dgeodgeo