VBA racine feuille : détection de la touche ENTREE

  • Initiateur de la discussion Initiateur de la discussion mazzyblast
  • Date de début Date de début

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 !

M

mazzyblast

Guest
Bonjour,

A la racine de ma feuille j'ai le code suivant

Code:
Private Sub Worksheet_Change(ByVal target As Range)
If Not Intersect(target, Range("D5:D1004")) Is Nothing Then
     If IsEmpty(target) Then
              
     Else
               
     End If
End If

..qui agit en se déclenchant si j'efface la valeur de cellule ou si je valide une nouvelle valeur.

J'aimerais savoir s'il est possible d'avoir aussi une condition de déclenchement si aucune valeur (ou absence de valeur, cellule vide) n'est changée, simplement en appuyant sur la touche ENTREE ?

Merci à vous
 
Dernière modification par un modérateur:
Re : VBA racine feuille : détection de la touche ENTREE

Bonsoir mazzyblast,

L'appui sur la touche Enter provoque un déplacement de cellule active. Tu peux donc utiliser le même événement que pour SelectionChange de la feuille:

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
MacroChange ActiveCell
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MacroChange ActiveCell
End Sub

Sub MacroChange(Target As Range)
If Not Intersect(Target, Range("D5:D1004")) Is Nothing Then
     If IsEmpty(Target) Then
             
     Else
               
     End If
End If
End Sub
Cordialement.
 
Re : VBA racine feuille : détection de la touche ENTREE

Bonsoir Papou et merci !

Reste un souci: dès que je sélectionne à la souris la cellule où j'aimerais appuyer sur ENTREE, cela s'active donc je n'ai jamais l'occasion d'appuyer sur ENTREE dans la case souhaitée ! Dilemene ^^
 
Re : VBA racine feuille : détection de la touche ENTREE

Bonsoir Papou,

Ca ne marchait pas chez moi alors j'ai attendu de demander à un ami pour confirmer et ça ne fait rien non plus pour lui quand nous nous plaçons sur une case jaune puis appuyons sur ENTREE

Pas grave. Merci malgré tout! Tout de bon
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
Microsoft 365 Probléme VBA
Réponses
8
Affichages
532
Réponses
4
Affichages
487
  • Question Question
Microsoft 365 worksheet_change
Réponses
29
Affichages
1 K
Réponses
4
Affichages
548
Retour