Cellule Vide VBA

[meldja]

Bonsoir,
J'ai une petite macro qui crée une nouvelle feuille et récupère la cellule active pour nommer l'onglet de la nouvelle feuille.
Voila comment j'ai déclaré le nom de la feuille ;
Dim Nom As String
Nom = ActiveCell

Comme vous pouvez le constater, il s'agit du nom de la cellule active.

Pour gérer les erreurs, j'aimerais que :
si une cellule contient un zéro, la procédure soit quittée (pas de pbme ;
If Nom = 0 Then...),
si une cellule ne contient rien du tout, la procédure soit également quittée (pbme, je n'y arrive pas, j'ai une erreur de compilation lorsque j'essaye IsEmpty(Nom)).
Si quelqu'un a une solution, merci d'avance.
Bonne soirée

 

[marmotte18]

Re : Cellule Vide VBA

Bonjour meldja,

Par ta définition "nom" est une chaîne de caractères (string)

Or ActiveCell, veut dire cellule active => ce n'est pas de même nature !

En effet, une chaîne de caractères n'a rien à voir avec une cellule => VBA risque de s'y perdre !

Par ailleurs, ne vaudrait-t-il pas mieux de définir avec précision la cellule qui devra comporter le nom de l'onglet futur (cellule K3 par exemple), cela évitera de mauvaise surprise.

 

[meldja]

Re : Cellule Vide VBA

Bonsoir,
Merci pour ta réponse.
Désolé, j'ai vraiment plané alors que c'était simple ; voila comment j'ai résolu le pbme :
If ActiveCell = 0 Or IsEmpty(ActiveCell) Then

Désolé d'avoir encombré le forum.
Bonne soirée.