Le mystère de la ligne 33

[Fab291]

Bonjour,

J'aimerais savoir comment dire en langage VBA:

SI la cellule active se trouve (ou est positionné) sur la ligne 33 (par exemple) Alors

If activecell ... Then

Merci

 

[Dull]

Re : Le mystère de la ligne 33

Salut Fab291, le Forum

Peut-être comme cela

If ActiveCell.Row = 33 Then MsgBox "coucou"

Bonne Journée

 

[Compte Supprimé 979]

Re : Le mystère de la ligne 33

Bonjour Fab291
Salut Dull et merci beaucoup

Grace à toi le mystère de la ligne 33 est, je pense, résolu

A quand le mystère de la ligne 34

 

[Fab291]

Re : Le mystère de la ligne 33

Bonjour Dull, BrunoM45,

Pas complétement résolue!

J'aimerais savoir comment procéder si j'ai nommé la ligne 33 (insertion/nom/définir)

ligne 33 s'appelle chez moi stop_supr1.

Merci

 

[Compte Supprimé 979]

Re : Le mystère de la ligne 33

Re,

Ahhhh je savais bien .... que le mystère allait s'épaissir

Dans ce cas il faut récupérer le numéro de la ligne nommée

LigStop = Sheets("Truc").Range("stop_supr1").Row
If ActiveCell.Row = LigStop Then MsgBox "ALERTE !"

A+

 

[Fab291]

Re : Le mystère de la ligne 33

Nickel !

Merci bien!

Le mystère est résolu !

 

[Staple1600]

Re : Le mystère de la ligne 33

Bonsoir


Une autre façon de résoudre le mystère

Sub a()
On Error Resume Next
MsgBox "Vous êtes sur la cellule : " & ActiveCell.Name.Name
End Sub

PS: salutations à BrunoM45 qui (ce n'est pas un mystère) m'a souvent ...