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

XL 2016 dépendance des ComboBox

melltel

XLDnaute Occasionnel
Bonjour, svp besoin d'aide (un peu banale mais que j'arrive pas a faire malgrés les solutions déja proposées ici)
je ne parviens pas a rendre mes deux combobox liées (dépendantes) de telle sorte que:
en sélectionnant une valeur(2) dans Tribord automatiquement Babord prend 3 et inversement.
la valeur devrait s’incrémentée ou se décrémentée automatiquement .

Voici mon fichier avec des codes d'essaie qui ne marchent pas. svp quelqu'un peut m'aider??
 

Pièces jointes

  • Comparaisson.xlsm
    21.5 KB · Affichages: 10
Solution
Peut être :
VB:
Private Sub ComboBox8_Change()
   Dim V As Byte
   If ComboBox8.MatchFound Then
      V = CByte(ComboBox8.Text)
      ComboBox9.Text = V Mod 5 + 1
      End If
   End Sub
Private Sub ComboBox9_Change()
   Dim V As Byte
   If ComboBox9.MatchFound Then
      V = CByte(ComboBox9.Text)
      ComboBox8.Text = (V + 3) Mod 5 + 1
      End If
   End Sub

melltel

XLDnaute Occasionnel
Please à L'aide !
 

Dranreb

XLDnaute Barbatruc
Peut être :
VB:
Private Sub ComboBox8_Change()
   Dim V As Byte
   If ComboBox8.MatchFound Then
      V = CByte(ComboBox8.Text)
      ComboBox9.Text = V Mod 5 + 1
      End If
   End Sub
Private Sub ComboBox9_Change()
   Dim V As Byte
   If ComboBox9.MatchFound Then
      V = CByte(ComboBox9.Text)
      ComboBox8.Text = (V + 3) Mod 5 + 1
      End If
   End Sub
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…