OVH Cloud OVH Cloud

Effacer une cellule fusionnée

4 réponses
Avatar
Guy72
Bonsoir à tous,
Dans la macro, j'ai mis "ActiveCell.ClearContents", çà efface bien une
cellule simple mais pas une cellule fusionnée.
Y a t'il un truc ?
Cordialement
Guy

4 réponses

Avatar
anonymousA
Bonjour,

with ActiveCell
if .MergeCells Then .MergeArea.ClearContents
End with

A+

Bonsoir à tous,
Dans la macro, j'ai mis "ActiveCell.ClearContents", çà efface bien une
cellule simple mais pas une cellule fusionnée.
Y a t'il un truc ?
Cordialement
Guy




Avatar
isabelle
bonjour Guy,

essai comme ça,

ActiveCell.Delete

isabelle


Bonsoir à tous,
Dans la macro, j'ai mis "ActiveCell.ClearContents", çà efface bien une
cellule simple mais pas une cellule fusionnée.
Y a t'il un truc ?
Cordialement
Guy




Avatar
Guy72
Re:
OK merci ça fonctionne.
Cordialement
Guy

"anonymousA" a écrit dans le message de news:
44f7209b$0$27377$
Bonjour,

with ActiveCell
if .MergeCells Then .MergeArea.ClearContents
End with

A+

Bonsoir à tous,
Dans la macro, j'ai mis "ActiveCell.ClearContents", çà efface bien une
cellule simple mais pas une cellule fusionnée.
Y a t'il un truc ?
Cordialement
Guy




Avatar
garnote
Salut Guy72,

Peut-ëtre que :

Sub Efface_Contenu()
On Error Resume Next
Selection.ClearContents
End Sub

Qu'en penses-tu ?

Serge



"Guy72" a écrit dans le message de news:
%
Bonsoir à tous,
Dans la macro, j'ai mis "ActiveCell.ClearContents", çà efface bien une
cellule simple mais pas une cellule fusionnée.
Y a t'il un truc ?
Cordialement
Guy