HELP Combobox dependantes

lucy831

XLDnaute Nouveau
Bonjour :),

Je sais que ces questions sur les combobox reviennent souvent mais je n'ai pas trouver de codes qui marchent. je mets en pièce jointe mon fichier, le but est simple je choisis le matricule d'une personne et j'ai automatiquement le 1er jour et de nom pour ne pas avoir d'erreur. Merci d'avance.

Lucy831
 

Pièces jointes

  • combobox_cascade.xlsm
    17.9 KB · Affichages: 44
  • combobox_cascade.xlsm
    17.9 KB · Affichages: 45
  • combobox_cascade.xlsm
    17.9 KB · Affichages: 46

Dull

XLDnaute Barbatruc
Re : HELP Combobox dependantes

Salut lucy831, le Forum

Ton code modifié en retour

Code:
Private Sub ComboBox3_Change()
Dim C As Range, i As Byte
Set C = Sheets("Matricule").Cells.Find(What:=ComboBox3)
If Not C Is Nothing Then
For i = 1 To 2
Controls("ComboBox" & i) = C.Offset(, i)
Next i
End If
End Sub
Bonne Journée
 

Pièces jointes

  • combobox_cascade.xlsm
    21.8 KB · Affichages: 57
  • combobox_cascade.xlsm
    21.8 KB · Affichages: 59
  • combobox_cascade.xlsm
    21.8 KB · Affichages: 60

lucy831

XLDnaute Nouveau
Re : HELP Combobox dependantes

Super, merci pour la reactivite :) juste encore un petit souci dans mon fichier j'ai les dates en francais mais avec la userform/combobox elles passent en anglais et le résultat final est en format anglais alors que je veux des dates françaises du début a la fin.
merki
 

Discussions similaires

Réponses
5
Affichages
1 K
Réponses
3
Affichages
1 K

Statistiques des forums

Discussions
312 176
Messages
2 085 965
Membres
103 069
dernier inscrit
jujulop