Discussion :

[Invité]

Bonjour à tous !

Désolé de répondre si tard.

Alors pour répondre aux questions posées ci-dessus, AlainTech a tout a fait saisi ce que je veux faire. L'utilité est évidente, je souhaite effectivement retraiter des données, pas présenter un rapport. Les cellules fusionnées me gênent donc plus qu'autre chose.

Je vais essayer ton code AlainTech mais il y a une petite contrainte de plus. En effet, si je reprend ton exemple "visuel", mon cas y ressemble mais il y aurait en fait plusieurs "colonnes A", 34 exactement (heureusement que le nombre de colonne est fixe d'ailleurs). il faudrait donc pouvoir trouver un moyen de selectionner toute la ligne qui contient la cellule fusionnée dans la colonne A.

Je ne sais pas si je suis suffisamment clair.

En tout cas AlainTech, ton code est bien plus simple que le mien (bon c'était pas difficile, je sais), je ne connaissais pas ces fonctions.

[ouskel'n'or]

Tu peux identifier des cellules fusionnées ainsi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Cells(1,1).select
DernièreLigne = selection.currentRegion.end(xlDown).row
DernièreColonne = selection.currentregion.End(xlToRight).column
for i = 1 To NbreColonnes
    For j = 1 to DernièreColonne 
         ok = Cells(j, i).MergeCells
         if ok then MsgBox ActiveCell.Address
    next j
Next i

Tu récupères les données et l'adresse dans un tableau et ensuite, tu les restitues.
Si tu as un pb, tu dis

A+

[ouskel'n'or]

Mais je m'aperçois que c'est ce qu'a donné AlainTech...
Donc on est deux à être d'accord avec moi donc ça devrait te convenir...

A+

[ouskel'n'or]

Un autre idée si aucune modification n'est faite dans la structure de ta feuille
Tu copies le format de la feuil1 sur une autre feuille, tu dissocies toutes tes cellules et tu recopies le format sur ta feuille feuil1 quand tu auras fait tes petites affaires...
C'est rapide, simple, et ça, tout le monde y arrive... re

A+

[Invité]

Bonjour à tous.

J'y suis arrivé !

En fait il suffisait de travailler par ligne une fois qu'on avait identifié une cellule fusionnée dans la première colonne.

Merci donc à AlainTech, je n'ai pas repris ta méthode mais j'ai pu intégrer des fonctions dont je ne connaissais pas l'écriture.