Discussion :

[laetitiaaa]

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 :

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

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