Bonsoir Pascal21, Charly2,
Comme ceci ?
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
iR = Target.Row
iC = Target.Column
If iC > 50 Then Cells(iR + 1, 1).Select
End Sub
Bonne soirée,
Bfr
Edition :
Attention toutefois, si sur le forum on peut paraître pinailleurs, ce n'est pas par personnalité, mais par nécessité, nous sommes sur un forum informatique et quand tu vois ce qu'une bête erreur de frappe ou de syntaxe peut te faire perdre comme temps, on sait qu'il faut être précis... c'est différent sur les fils du salon ou le t'chat
Donc : Ce que tu as trouvé, n'est pas une formule ( c'est une procédure (évènementielle même)), c'est important dans le contexte.
Dans ton énoncé, j'ai remplacé pour mon raisonnement si la ligne 50 est atteinte par la colonne 50, sinon, c'est que je suis à côté de la plaque... :whistle:
Donc faut être vigilant là-dessus, la preuve, il ne faudrait pas chercher bien loin un fil où j'ai fait ce genre de choses (cf le zop par exemple...)
Bonne nuit
Message édité par: bricofire, à: 06/01/2006 22:12