Macro excel insère ligne sous condition

Résolu/Fermé

Condition

tchernosplif Messages postés 600 Date d'inscription dimanche 8 novembre 2009 Statut Membre Dernière intervention 21 juin 2015 - Modifié par tchernosplif le 3/12/2010 à 13:51
tchernosplif Messages postés 600 Date d'inscription dimanche 8 novembre 2009 Statut Membre Dernière intervention 21 juin 2015 - 1 juil. 2011 à 14:03

Bonjour,

Sauriez vous faire une macro pour insérer des lignes à chaque changement de valeur?

J'ai par ex dans la colonne A:

A
A
B
B
B
C
D
D

et le résultat souhaité est

A
A
'insere une ligne'
B
B
B
'insere une ligne'
C
'insere une ligne'
D
D

Merci d'avance pour vos réponses lumineuses.

A voir également:

Excel insérer une ligne à chaque changement de valeur
Aller à la ligne excel - Guide
Insérer liste déroulante excel - Guide
Insérer une vidéo dans powerpoint - Guide
Partage de photos en ligne - Guide
Déplacer une colonne excel - Guide

1 réponse

Réponse 1 / 1

tchernosplif Messages postés 600 Date d'inscription dimanche 8 novembre 2009 Statut Membre Dernière intervention 21 juin 2015 245
3 déc. 2010 à 14:03

J'ai trouvé merci

Sub insertA()
Dim cellule As Variant

'se positionne au bas de la colonne et remonte
For i = Range("a65536").End(xlUp).Row To 1 Step -1

'selectionne la ligne lors du changement de valeur et ajoute une ligne en dessous
If Cells(i, 1).Value <> Cells(i + 1, 1).Value Then Rows(i + 1).EntireRow.Insert Shift:=x1Down

Next i

End Sub

Lomic6
Modifié par Lomic6 le 1/07/2011 à 07:16

Quant est il si on veut obtenir le meme style de resultat simultanement sur plusieurs colonnes ?
Par exemple dans colonne A on a:
A
A
A
B
B
C
D
D

Dans colonne B on a:
a
a
a
a
a
a
b
c
et je veux faire une insertion de une seule ligne pour obtenir...

A a
A a
A a
"inserer ligne"
B a
B a
"inserer ligne"
C a
"inserer ligne"
D b
"inserer ligne"
D c
"inserer ligne"

Merci d'avance pour vos bons conseils ;)

tchernosplif Messages postés 600 Date d'inscription dimanche 8 novembre 2009 Statut Membre Dernière intervention 21 juin 2015 245
1 juil. 2011 à 14:03

Bjr , vous pourriez, concatener la colonne A et B et et lancer la macro sur cette nouvelle colonne

Par exemple colonne C:
Aa
Aa
Aa
Ba
Ba
Ca
Db
Dc

Discussions similaires

Excel : Suppression de ligne sous condition

supprimer une ligne avec la fonction "SI"

[EXCEL] - Suppression ligne sur condition

Excel: Masquer lignes en fonction de critères

Formule pour copier une ligne sous condition??

Macro pour déplacer une ligne sous condition