Insérer des lignes en fonction de la valeur des cellules

Bonjour à Tous et Toutes,

Je souhaiterais insérer des lignes sous les valeurs des cellules d'une colonne.

Il faut que la macro puisse:

- chercher au niveau de la colonne B, à partir du titre "Echeance", les valeurs et y insérer le nombre de lignes

Par exemple:

Si nous avons 4, il faut que 4 Ligne soient crées sous le 4

Merci à tous et toutes

tab

Bonjour

avec un bout de tableau, la valeur cherchée et la localisation du nb correspondant aux lignes à insérer on peut faire quelque chose...

Cordialement

FINDRH

Bonjour,

Voici le code que j'ai commencé à faire ça, mais en recherchant La valeur "R" dans la colonne.

Mais à partir de là, je ne sais comment lui demander de rechercher toute les nbre dans la colonne et dès qu'il y a un chiffre, qu'il ajoute le nombre de ligne associés.

Sinon pourquoi pas un tableau mais c vrai que la feuille excel m'arrangerait bcp.

Merci.

Sub DelEditeur()

Dim i As Integer

With ThisWorkbook.Sheets("Feuil1")

'Précisez le nom de votre feuille

For i = .Range("C" & .Rows.Count).End(xlUp).Row To 2 Step -1

'je travaille sur la colonne c

'Rows.count permet de retourner le nombre de ligne de la plage range

If .Range("C" & i).Value = "R" Then

.Rows(i).insert

End If

Next i

End With

End Sub

Re Bonjour

Sans un bout de tableau et une vision du résultat il me sera difficile de t'aider

Cordialkement

FINDRH

Rechercher des sujets similaires à "inserer lignes fonction valeur"