Raccourci CTRL+Flèche

tu peux modifier ton code comme ceci :

Range("B65536").Select
Selection.End(xlUp).Select
MsgBox ActiveCell.Value
Selection.Offset(-1, 0).Select
MsgBox ActiveCell.Value

Re: Pour Ti - Raccourci CTRL+Flèche

Salut,


En fait je ne voulais pas faire un roman pour expliquer ce que je voulais faire en final, mais mon but, c'est :

. Sur ma feuille, j'ai des lignes contenant des données comme le fichier TEST_1 modifié ci-joint, avec des lignes intermédiaires vides.
. Lorsque je Dbl-Clics sur la cellule B10 par ex. je veux insérer une nouvelle feuille portant le nom du contenue B10
. Mais cette feuille doit être placée après celle de la cellule B9

. Pour cela, j'ai pensé passer par le code test de mon 1er massage pour lire le contenu de la cellule juste au-dessus, me placer sur cette feuille et puis ensuite insère ma feuille concernée.


C'est là que mon problème apparaît.
Comprend-tu pourquoi le CTRL+Flèche haut ne s'arrête pas à la cellule juste au-dessus ?

Est-ce clair mon explication ?

J'ai pensé aussi de balayer les ligne au-dessus jusqu'à ce que le contenu ne soit pas vide, mais il semble que cette méthode ne tourne pas très vite.


Merci

A+

Re: Pour Ti - Raccourci CTRL+Flèche

OK, c'est un peu différent de ce que tu expliquais au début. Va voir le fichier joint, j'y ai placé une macro événementielle qui fait ce que tu veux.

Par contre la réaction de Ctrl-Flèche est normale. En faisant ça tu te
positionne sur la première cellule de la plage courante et pas seulement sur la cellule précédente.