Aligner des cellules de même nature

Bonjour à tous les membres du forum et meilleurs voeux.

Ma question peut être compliquée mais l'explication dans mon fichier joint est simple.

J'aimerais savoir si l'on peut, avec une macro, aligner 2 cellules de même couleur et portant le même nom dans 2 tableaux alignés presque égaux sur une feuille.

Merci à tous

Oui c'est possible, utilise ce code :

Sub align()
Dim derlig As Long, i As Long, ligne As Long
Dim temp As String
    Application.ScreenUpdating = False
    derlig = Cells.Find("*", , , , xlByRows, xlPrevious).Row
    For i = 1 To derlig
        ligne = 0
        If IsNumeric(Left(Range("E" & i), 3)) Then
            temp = Range("E" & i)
            ligne = Range("AA:AA").Find(temp, , , xlValue).Row
        ElseIf IsNumeric(Left(Range("F" & i), 3)) Then
            temp = Range("F" & i)
            ligne = Range("AB:AB").Find(temp, , , xlValue).Row
        ElseIf IsNumeric(Left(Range("G" & i), 3)) Then
            temp = Range("G" & i)
            ligne = Range("AC:AC").Find(temp, , , xlValue).Row
        End If
        If ligne <> 0 Then
            Do While ligne < i
                Range("AA" & ligne & ":IV" & ligne).Insert Shift:=xlDown
                ligne = ligne + 1
            Loop
        End If
    Next i
End Sub

Voici le fichier correspondant :

J'ai également mis une macro (align2) qui prend en compte la couleur de la cellule (bien que je n'en vois pas trop l'utilité).

Bonjour,

j'essaie en vain d'adapter le code posté ci-dessus à mon document (joint). C'est du texte et j'aimerai trouver un moyen d'automatiser les catégories, genre "à partir de la ligne n, nationalité, ligne n+1 langue nationale,....). J'ai bien conscience que le code doit être assez voisin de celui posté, mais j'aurai vraiment besoin d'aide pour l'adapter. Merci.

Bonjour,

j'essaie en vain d'adapter le code posté ci-dessus à mon document (joint). C'est du texte et j'aimerai trouver un moyen d'automatiser les catégories, genre "à partir de la ligne n, nationalité, ligne n+1 langue nationale,....). J'ai bien conscience que le code doit être assez voisin de celui posté, mais j'aurai vraiment besoin d'aide pour l'adapter. Merci.

Bonjour magra et

Ton fichier n'est pas passé. Essaie de le compresser ou bien de nous joindre un fichier allégé avec un exemple de ce que tu souhaites.