OVH Cloud OVH Cloud

IsEmpty et cellules fusionnées

2 réponses
Avatar
Nicolas B.
Bonsoir à tous,

J'ai un petit problème avec la fonction isempty en VBA : quand on teste
si une cellule fusionnée contient quelque chose, isempty revoie toujours
FAUX. Comment ce fait-il ? et comment contourner ce problème ?


Merci
Nicolas B.

2 réponses

Avatar
michdenis
Bonjour Nicolas B.

" revoie toujours FAUX "
*** ton classeur est malade

En supposant que Range("A1") représente une cellule fusionnée
si elle est TOTALEMENT vide. même sans espace issu de la barre d'espacement
Msgbox IsEmpty(Range("A1")) retourne VRAI


Salutations!


"Nicolas B." a écrit dans le message de
news:
Bonsoir à tous,

J'ai un petit problème avec la fonction isempty en VBA : quand on teste
si une cellule fusionnée contient quelque chose, isempty revoie toujours
FAUX. Comment ce fait-il ? et comment contourner ce problème ?


Merci
Nicolas B.
Avatar
Nicolas B.
Bonsoir michdenis,

En fait le code était dans une procédure Worksheet_Change :

Private Sub Worksheet_Change(ByVal Target As Range)
MsgBox IsEmpty(Target)
End Sub

Dans ce cas, avec la cellule fusionnée A1:A2 sélectionnée, l'adresse
renvoyée par Target.Address est A1:A2 au lieu de A1.

C'est donc réparé en faisant comme ça :
MsgBox IsEmpty(Target(1, 1))


A+ et bonne soirée
Nicolas B.

michdenis wrote:
Bonjour Nicolas B.

" revoie toujours FAUX "
*** ton classeur est malade

En supposant que Range("A1") représente une cellule fusionnée
si elle est TOTALEMENT vide. même sans espace issu de la barre d'espacement
Msgbox IsEmpty(Range("A1")) retourne VRAI


Salutations!


"Nicolas B." a écrit dans le message de
news:
Bonsoir à tous,

J'ai un petit problème avec la fonction isempty en VBA : quand on teste
si une cellule fusionnée contient quelque chose, isempty revoie toujours
FAUX. Comment ce fait-il ? et comment contourner ce problème ?


Merci
Nicolas B.