Insérer des lignes selon condition de valeur

Fayss -  
ccm81 Messages postés 11033 Statut Membre -
Bonjour à tous,

Je cherche une formule ou une macro qui permet d'insérer des lignes selon une valeur.
un exemple: dans la colonne C, je met le chiffre 4 dans une cellule puis j'ai 4 lignes qui s'insert en dessous,ou si je met le chiffre 7, j'ai 7 lignes qui s'insert en dessous ainsi de suite!

Merci d'avance pour votre aide!

1 réponse

ccm81 Messages postés 11033 Statut Membre 2 434
 
bonsoir

pour une valeur de lignes a inserer en colonne C une macro

Private Sub Worksheet_Change(ByVal Target As Range) 
Dim lig As Long 
Dim li As Long 
 If Target.Column = 3 Then 
    li = Target.Row 
    Rows(li + 1).Select 
      For lig = 1 To Target.Value 
        Selection.EntireRow.Insert 
      Next lig 
  End If 
End Sub 

est ce que ça repond?

bonne suite
0