Microsoft 365 SendKeys "%{down}" pour Apple/mac

Johan_25

XLDnaute Nouveau
Bonjour à tous,
Je travail sur un projet en ce moment utilisé par des utilisateurs Windows et Apple. Perso je suis sur windows et j'ai utilisé la commande : SendKeys "%{down}" pour dérouler automatiquement une liste déroulante présente sur une cellule. Mon but est simple, si tu vas sur une cellule avec un liste déroulante, elle se déroule sans action de l'utilisateur. Pour comprendre je vous met mon code.
Ce code fonctionne très bien sur Windows ... Pas du tout sur Mac. Effectivement j'ai trouvé que la commande SendKeys n'est pas compatible avec Apple.
Est ce vous connaissez un équivalent Mac ?
Je vous remercie d'avance !
VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Selection.Row >= 18 And Selection.Row <= 166 Then
        If (Target.Column >= 6 And Target.Column <= 7) Or (Target.Column >= 15 And Target.Column <= 16) Then
            SendKeys "%{down}"
        End If
    End If
End Sub
 

fanch55

XLDnaute Barbatruc
Bonjour
Comme vous le faites remarquer :
1649325029323.png





N'étant pas sur Mac, je ne pourrai pas vous aider plus ... 😩
 

Discussions similaires

Réponses
32
Affichages
891

Statistiques des forums

Discussions
314 713
Messages
2 112 131
Membres
111 434
dernier inscrit
dellidjk