Copier/coller vba cellules sélectionnées

Bonjour,

Dans un fichier Excel, j'ai des formules inscrites sur la première ligne d'un tableau (ligne 1 par exemple). Je voudrais une fonction VBA qui permettrait de copier ces formules et les coller dans les cellules sélectionnées qui sont dans la même colonne que la formule et une autre qui permettrait de la coller dans la totalité des colonnes sélectionnées.

Par exemple, mon tableau s'étend de la cellule A1 jusqu'à J300 et j'ai une formule différente de A1 jusqu'à J1. Si je sélectionne les cellules A2 jusqu'à A24 et D8 jusqu'à D12, je veux une macro qui copierait la formule en A1 et la collerait dans les cellules A2 jusqu'à A24 et qui copierait ensuite celle de D1 pour la coller dans les cellules D8 jusqu'à D12.

Je veux aussi une autre macro qui copierait la formule en A1 pour la coller dans toutes les cellules de la colonne A, soit des cellules A2 jusqu'à A300 et qui copierait ensuite la formule en D1 pour la coller dans toutes les cellules de la colonne D, soit des cellules D2 jusqu'à D300.

Pouvez-vous m'aider s.v.p.?