Problèmes de débutant : TextBox, ComboBox et Rowsource

[koukou40]

Bonjour,

Je débutes en VBA Excel et j'ai quelques soucis de programmation afin de finaliser un petit programme ! 😕
Problème n°1 :
2 TextBox ("Date saisie" et "Semaine"). Comment afficher le n° de la semaine suivant la date saisie ?

Problème n°2 :
1 TextBox "code" et un ComboBox "Nom". Comment afficher le code lié au nom saisie ?

Problème n°3 :
1 ComboBox "Nom". Comment afficher la liste des noms ? J'ai entendu parler de "Rowsource" !

D'avance, merci.

koukou40

 

[RENAUDER]

Re : Problèmes de débutant : TextBox, ComboBox et Rowsource

Bonjour,
Déjà le problème1

Private Sub TxtDatesaisie_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    Me.TxtNoSemaine.Value = NOSEM(Me.TxtDatesaisie.Value)
End Sub
Function NOSEM(D As Date) As Long
    D = Int(D)
    NOSEM = DateSerial(Year(D + (8 - Weekday(D)) Mod 7 - 3), 1, 1)
    NOSEM = ((D - NOSEM - 3 + (Weekday(NOSEM) + 1) Mod 7)) \ 7 + 1
End Function

 

[Pierrot93]

Re : Problèmes de débutant : TextBox, ComboBox et Rowsource

Bonjour Koukou, Eric

une autre solution pour la question 1 :

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    If IsDate(TextBox1.Value) Then TextBox2.Value = DatePart("ww", TextBox1.Value, 2, 2)
End Sub

pour la question 3, un post sur la FAQ avec les differentes façons d'alimenter un combobos ou listbox.

https://www.excel-downloads.com/threads/vba-alimentation-dune-combobox-ou-dune-listbox.81037/

bonne soirée
@+

 

[koukou40]

Re : Problèmes de débutant : TextBox, ComboBox et Rowsource

Merci à vous deux, je vais faire le test !

koukou40

 

[koukou40]

Re : Problèmes de débutant : TextBox, ComboBox et Rowsource

Bonjour Pierrot93 !
Aurais tu une idée pour mon problème n°2 ?

Merci

koukou40

 

[Pierrot93]

Re : Problèmes de débutant : TextBox, ComboBox et Rowsource

Bonjour Koukou

il faudrait savoir ou et comment sont stockées tes données sur ta feuille excel.

bon après midi
@+

 

[koukou40]

Re : Problèmes de débutant : TextBox, ComboBox et Rowsource

Mes données sont stockées dans deux onglets différents ( codes et nom).

koukou40

 

[Pierrot93]

Re : Problèmes de débutant : TextBox, ComboBox et Rowsource

Re

et quel critère permet de relier l'un à l'autre.... mets peut être un fichier exemple en pièce jointe, sans données confidentielles, ce sera plus simple.

@+