Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Allez directement en cellule "E2" sans passer par la cellule "I2"

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous 🙂

J'en ai une "petite bonne" que je ne parviens pas à coder malgré mes recherches et tests.

Quand on valide "entrée" une cellule, Excel passe à la cellule suivante : Pour mon besoin, je voudrais l'éviter...

Ce que je voudrais faire :
cellule H2: Si Clic et modifie contenu ou clic ... à l'appui sur touche "entrée"
Allez directement en cellule "E2" (Cells(ActiveCell.Row, 5).Select)
sans passer par la cellule "I2"

Vous sauriez le faire ?
En cas, je joins un petit fichier test.

Un grand merci à tous pour votre aide...
Amicalement
🙂
 

Pièces jointes

Dernière édition:
Solution
Si tu ne veux plus t'emm... avec les déplacements automatiques ,
code à mettre dans ThisWorkBook :
VB:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.MoveAfterReturn = True
End Sub

Private Sub Workbook_Open()
    Application.MoveAfterReturn = False
End Sub
Surtout ne pas oublier le beforeclose !!!
Petite question :
Est-il possible de mettre dans le ThisWorkBook "Application.MoveAfterReturn" = False" mais pour qu'il n'ait d'effet que sur une feuille ?
🙂
A mettre dans le Thisworkbook:
Modifier "Feuil1" par le nom de la feuille où le return doit être neutralisé
VB:
Private Sub Workbook_Open()
    Workbook_SheetActivate ActiveSheet
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    Application.MoveAfterReturn = Not Sh.Name = "Feuil1"
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.MoveAfterReturn = True
End Sub
 
Merci à toi 🙂
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…