Discussion :

[rakel]

Bonjour,

Dans un tableur excel, j'aimerai que, lorsque j'appuie sur le bouton "Ajouter les lignes" pour lequel j'aurai affecté la macro, la ligne 14 soit copiée n fois, n étant le chiffre inscrit dans la case C7.
Dans la colonne A de ces lignes copiées, il faudrait que les chiffres soient incrémentés de 1 à n (n=C7).

Qui peut m'aider à écrire cette macro?
Mille merci d'avance.

[sabzzz]

bonjour rakel,

voila,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub Macro1()
Dim x As Integer
x = Range("C7")
Rows("14:14").Copy
Rows("14:" & 14 + x - 1).Insert Shift:=xlDown
Range("A13:A14").AutoFill Destination:=Range("A13:A" & 14 + x), Type:=xlFillDefault
End Sub

isabelle
ps: n'oubliez jamais de vous inspirer de l'enregistreur de macro.

[rakel]

Nikel,
Merci Isabelle!