Posez votre question Format imprimable Liste des forums Aidez-les Statistiques Rechercher Charte Forum Bureautique

Excel-Insertion automatique conditionnée

Dernière réponse le 8 jan 2009 à 00:27:36 Kiriko, le 7 jan 2009 à 16:01:28

Signaler ce message aux modérateurs

Bonjour,
Dans un tableau excel, dans une même colonne, des chiffres apparaissent, ils sont souvent les mêmes plusieurs lignes de suite, puis changent. Je souhaite insérer une ligne (complète) vierge automatiquement à chaque changement de valeur dans cette colonne spécifique.

Merci par avance pour votre aide...
Et bonne année en passant.

Configuration: Windows Vista
Firefox 3.0.5

Posez votre question Répondre

gbinforme, le 7 jan 2009 à 17:46:37

Bonjour

Avec cette macro à placer dans la feuille concernée ou dans un module cela devrait le faire (mode d'emploi)

Public Sub insere_ligne()
Dim l As Long
Dim c As String
c = "C" ' colonne test
For l = Cells.SpecialCells(xlCellTypeLastCell).Row To 2 Step -1
    If Cells(l, c) <> Cells(l - 1, c) Then Rows(l).Insert
Next l
End Sub

Toujours zen

Répondre à gbinforme

Kiriko, le 8 jan 2009 à 00:27:36

Mille merci, c'est parfait....
ça donne envie de se mettre à VBA.

Répondre à Kiriko

Posez votre question Répondre