Aide pour créer une boucle

Bonjour,

Je souhaite récupérer dans une premiere feuille des données issues d'un questionnaire, dans certaines cellules (sachant je vais en avoir de plus en plus) puis les coller en lignes sous les intitulé créer par mes soins....

Sub test8()

Range("D5") = "Accueil"
Range("E5") = "Découverte"
Range("F5") = "Traitement de la demande"
Range("G5") = "Conclusion"
Range("H5") = "Savoir-être"
Range("I5") = "Règles Métiers, Outils & Services"
Range("J5") = "Note Globale"
Range("K5") = "Collaborateur"
Range("L5") = "Date"
Range("M5") = "Métier"

Range("K6").FormulaLocal = "=Feuil1!F6 "
Range("L6").FormulaLocal = "=Feuil1!F5"
Range("D6").FormulaLocal = "=Feuil1!G14"
Range("E6").FormulaLocal = "=Feuil1!G15"
Range("F6").FormulaLocal = "=Feuil1!G19"
Range("G6").FormulaLocal = "=Feuil1!G24"
Range("H6").FormulaLocal = "=Feuil1!G26"
Range("I6").FormulaLocal = "=Feuil1!G31"
Range("J6").FormulaLocal = "=Feuil1!F37"
Range("M6").FormulaLocal = "=Feuil1!F9"

Range("K7").FormulaLocal = "=Feuil1!F48"
Range("L7").FormulaLocal = "=Feuil1!F47"
Range("D7").FormulaLocal = "=Feuil1!G56"
Range("E7").FormulaLocal = "=Feuil1!G57"
Range("F7").FormulaLocal = "=Feuil1!G61"
Range("G7").FormulaLocal = "=Feuil1!G66"
Range("H7").FormulaLocal = "=Feuil1!G68"
Range("I7").FormulaLocal = "=Feuil1!G73"
Range("J7").FormulaLocal = "=Feuil1!F79"
Range("M7").FormulaLocal = "=Feuil1!F51"

Range("K8").FormulaLocal = "=Feuil1!F90"
Range("L8").FormulaLocal = "=Feuil1!F89"
Range("D8").FormulaLocal = "=Feuil1!G98"
Range("E8").FormulaLocal = "=Feuil1!G99"
Range("F8").FormulaLocal = "=Feuil1!G103"
Range("G8").FormulaLocal = "=Feuil1!G108"
Range("H8").FormulaLocal = "=Feuil1!G110"
Range("I8").FormulaLocal = "=Feuil1!G115"
Range("J8").FormulaLocal = "=Feuil1!F121"
Range("M8").FormulaLocal = "=Feuil1!F93"

....puis pour 9,10,11.......

Voila mon programme qui me donne ce que je souhaite mais je voudrais créer une boucle pour m'éviter de taper ces 10 lignes encore et encore et encore....surtout que la cellule de la feuille 1 change tt le temps

MERCI POUR VOTRE AIDE
Nordine

EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ici :
https://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code

Merci d'y penser dans tes prochains messages.
.