VBA - inserer des lignes

Bonjour,

Je suis extrêmement novice sous VBA et je teste des choses sans succès...

J'aimerai que : si les cellules de la colonne B contiennent la variable "0813J" alors ca rajoute 4 lignes en dessous de la cellule contenant la fameuse variable.

Mais en plus il faut que:
- les lignes rajoutées soient identique
- sauf pour le montant où ca doit etre vide
- et pour la génération où ca doit aller de 2013 à 2016
- et en plus il faut rajouter la génération 2012 dans la ligne contenant la variable "0813J"

Je n'arrive déjà pas à rajouter des lignes donc je suis un peu perdue =(

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Sub test()   Dim i As Integer For i = 0 To 30 If Range("B1").Offset(i, 0).Value = "0813J" Then Rows(i & ":" & i).Select Selection.Copy Selection.Insert Shift:=xlDown Else End If Next i   End Sub

---

J'ai mis l'exemple en pièce jointe (1er tableau : ce que j'ai 2eme tableau : ce que j'aimerai obtenir)

Merci beaucoup à toutes les personnes pouvant m'apporter un peu d'aide

Bonjour,
Attention a l'offset. Tu as du coup un décallage de ligne. Si tu prends le Rows i tu vas prendre la ligne au dessus car ton offset commence en B1.

Exemple:
Ligne 6 tu as la valeur qui t'interesse, du coup tu veux prendre la ligne 6 or l'offset vaut 5 donc tu vas prendre la ligne 5, la copier et l'insérer.
Ensuite tu vas offseter d'1 incrément mais du coup tu auras rajouter une ligne avant donc tu vas toujours tomber sur la ligne avant celle contenant 0813J que tu vas copier et insérer avant.
Quand tu isères une ligne, il faut que tu incrémente ton i d'autant sinon tu vas toujours tomber sur la ligne insérée.

Ce que je ferais c'est faire une petite boucle de 4 insert de ligne quand tu tombes sur la ligne qui t'interesse, puis tu incrémente ton i de 4 pour tomber sur une ligne après celles insérées.

j'espere que je suis clair!

Bon courage!

EDIT: Tu peux lancer ton code pas a pas pour voir ce qu'il fait en appuyant sur la touche F8 quand tu es dans le corps de la sub, ca te permettra de voir ce que fait le code.

Bonjour
Je ne vais pas entrer dans les autres aspects de cette question ouverte dans la section Excel, mais qui relève de la section VBA.
Je vais donc ici me contenter de rappeler que lorsque l'on modifie (que ce soit par suppression ou par insertion) le nombre de lignes, on le fait de bas en haut (pour ne pas se mélanger les pinceaux dans la numérotation des lignes traitées) et non de haut en bas.
Voilà.

Merci beaucoup Terim pour les explications , je vois mieux où est le souci , je vais essayer de faire une boucle de 4 lignes alors