fusionner des cellules

[sandy]

salut a tous j'aimerais savoir comment fusionner des cellules apres la cellule active (ActiveCell) je n'arrive pas a recuperer l'adresse de la case de la cellule active pour pouvoir fusionner les cellules d'apres...
Merci d'avance pour votre aide
SAndy

 

[marco57]

Bonsoir Sandy,

Je présume que tu veux faire cela en VBA.
Essaye donc ça:

Range(ActiveCell, ActiveCell.Offset(0, 2)).MergeCells = True

Ce code devrait te fusionner la cellule active avec les deux cellules situées à sa droite.

Marco

 

[ChTi160]

Salut Sandy

que veux tu faire exactement
fusionner des cellules ,mais comment à partir d'une boucle d'une recherche
pour fusionner deux cellules, il suffit de les sélectionner et ensuite de les fusionner (as tu essayé l'enregistreur de Macro de Vba)
par exemple
Range('A1:B1').select
Selection Merge
ou
Selection.MergeCells = True
met un fichier exemple si tu le peux (zip-50Ko)

Ouppsssssssssss Salut Marco

Message édité par: ChTi160, à: 15/06/2005 22:17

 

[sandy]

merci beaucoup marco57 tu m'as eté d'une aide précieuse

 

[sandy]

merci beaucoup pour ton aide jean marie
biz sandy