Commentaire cellule dans barre d'état

[patrick]

Bonjour à tous,

Je voudrais insérer un message dans la barre d'état lorsque la souris passe sur une cellule particulière (un peu comme un commentaire).
Merci pour l'aide du forum.

Patrick

 

[Hervé]

bonjour

essaye ceci :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set x = Application.Intersect(Target, Range("A1,a5,b2"))
If Not x Is Nothing Then
Application.StatusBar = "Vous êtes sur la cellule : " & Target.Address
Else
Application.StatusBar = ""

End If
End Sub

cette macro indique lorsque que l'on clique dessus les cellules a1, a5 et b2
un message dans la barre d'état.

salut
Hervé

 

[EricS]

Bonjour,

Pourquoi pas directement sur la cellule par "insertion - commentaire"

Si tu n'as pas de pb spécifique, c'est déjà fourni avec Excel...

....c'est mieux

A+
Eric

 

[patrick]

Hervé,

C'est presque ça...
Avec le code que tu me proposes, il faut sélectionner la cellule. Or je voudrais que le message s'affiche lorsque je passe le pointeur de la souris.

Merci pour ta proposition.

 

[Hervé]

re

j'avais bien compris ce que tu voulais, mais je n'ai rien trouvé pour parametrer le survol d'une cellule par la souris (Je me demande même si c'est possible).

Je ne sais pas ce que tu veux faire exactement mais la proposition de Eric s est pas mal.

Salut
Hervé