Sujet Précédent Sujet Suivant

Macro pour fusionner certaines cellules

Résolu/Fermé
Eline - Modifié par Eline le 28/08/2013 à 16:51
 Eline - 29 août 2013 à 21:52
Bonjour à tous et à toutes.

Pouvez-vous m'aider svp à simplifier mon tableau excel à l'aide d'une macro. Je ne suis pas une grande spécialiste ? Voici mon souci.

Je souhaiterais que : si même chiffre en colonne D7 à D1000 et même chiffre en colonne E7 à E1000 fusionner les cellules de la colonne E.

Exemple :

28 3
25 2
28 1
28 1

Fusionner les deux chiffres 1 et mettre une seule cellule avec le chiffre 1.
Merci vraiment pour votre aide.


A voir également:

4 réponses

Réponse 1 / 4
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523
28 août 2013 à 17:33
Bonjour,

Essaie avec cette macro 
Sub test()
Dim Cel As Range
Dim Ligne As Long
    For Each Cel In ThisWorkbook.ActiveSheet.Range("D7:D1000")
        If Cel = Cel.Offset(1, 0) Then
            If Cel.Offset(0, 1) = Cel.Offset(1, 1) Then
                Application.DisplayAlerts = False
                Cel.Offset(0, 1).Resize(2, 1).Merge
                Application.DisplayAlerts = True
            End If
        End If
    Next Cel
End Sub

A+
1
Eline
28 août 2013 à 19:53
Je n ai malheureusement pas la possibilité de répondre tout de suite mais je regarde demain matin. En tout cas merci déjà pour cette réponse :@)
0
Réponse 2 / 4
Eline
29 août 2013 à 11:29
Bonjour Gyrus,

Ta macro fonctionne très bien mais c'est moi qui ai oublié de t'informer de qqch de très important. Il s'agit d'un tableau ! Du coup, elle ne fonctionne plus :-(

Peux-tu m'aider ? :-)
0
Réponse 3 / 4
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523
29 août 2013 à 11:58
Bonjour,

Je ne crois pas que l'on puisse fusionner les cellules d'un tableau (ce qui ne me parait pas illogique du fait même de la fonctionnalité du tableau).

A+
0
Réponse 4 / 4
Eline
29 août 2013 à 21:52
Ok, merci en tout cas pour ta formule :-) ça m a déjà bien aidé.
0

Discussions similaires

Impossible fusionner cellules
aubli -
aubli -

2 réponses