OVH Cloud OVH Cloud

cellules fusionnées et VBA

1 réponse
Avatar
goth
Bonjour!

une petite question

j'ai des cellules fusionn=E9es (de A1 =E0 A3)qui contiennent=20
par exemple la valeur "TOTO". En VBA seul range
("A1").value =3D "toto". Les autres cellules A2 et A3 ont=20
une valeur =E9gale =E0 "". Comment faire pour que toutes les=20
cellules fusionn=E9es (de A1 =E0 A3) prennent la valeur toto?


Merci davance!

1 réponse

Avatar
isabelle
bonjour goth,

Set pgl = Range("a3").MergeArea
If Range("a3").MergeCells Then MsgBox pgl.Item(1).Value

isabelle


Bonjour!

une petite question

j'ai des cellules fusionnées (de A1 à A3)qui contiennent
par exemple la valeur "TOTO". En VBA seul range
("A1").value = "toto". Les autres cellules A2 et A3 ont
une valeur égale à "". Comment faire pour que toutes les
cellules fusionnées (de A1 à A3) prennent la valeur toto?

Merci davance!