paramètrage de texte fonction de la place du curseur

[cbaby]

Bonjour,

je souhaiterais savoir s'il existe un moyen de parametrer le contenu d'une cellule en fonction de la position du curseur dans la feuille.

exemple:

cellule A1: "Haut" si le curseur est entre les lignes 1 et 100
"Bas" si le curseur est au delà de la ligne 100

Merci d'avance

[White Mibu]

Bonjour,

Microsoft Excel Objets, sélectionne la feuille en question et met le code suivant :

Code :

1
2
3
4
5
6
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 
    If ActiveCell.Row < 100 Then Cells(1, 1) = "Haut"
    If ActiveCell.Row > 100 Then Cells(1, 1) = "Bas"
 
End Sub

Bon week

Cordialement