formules sur 1 selection

bonjour je souhaiterai pouvoir trouver sur la selection en c8 avoir ceci

Code:

---

1 2 3

Range("M8:Q8").Select Selection.AutoFill Destination:=Range("M8:Q9"), Type:=xlFillDefault Range("M8:Q9").Select

---

mais si la selection est dans la meme colonne mais si c'est c12 avoir

Code:

---

1 2 3

Range("M12:Q12").Select Selection.AutoFill Destination:=Range("M12:Q13"), Type:=xlFillDefault Range("M12:Q13").Select

---

toujours dans l'objectif de preserver les formules et quelle se mettre au fur et a mesure j'ai essayé quelques solutions mais plusieurs problemes surgisses
et la grande difficultéde trouver certaine formules en vba surtout si elle sont longue
"nous allons nous en sortir j'ai confiance en vous merci" bonne journee

Bonjour,
Ton code, il sera dans une boucle, c'est suite à un changement de valeur dans cette plage, ou autre chose ?