Discussion :

[flagpara]

Bonjour à tous,

Je n'ai pas trouvé la réponse à ma question dans la FAQ alors je me tourne vers vous:

J'ai un userform avec listes déroulantes que j'utilise pour sélectionner une date de début et une date de fin. Je veux ensuite trouver dans quelle colonne se situent cette date début et cette date de fin donc j'ai essayé:

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
 
DateDebutP = FileP.Worksheets("Présence CDC 2017").Rows(5).Find(ListBox3.List(ListBox3.ListIndex) & "/" & ListBox4.List(ListBox4.ListIndex) & "/" & ListBox5.List(ListBox5.ListIndex)).Value

Mais ça me mets en message d'erreur "erreur 91, variable objet ou variable de bloc With non défini"
Et là j'avoue que je suis perdu. Je n'ai pas de bloc with et pour moi tout est défini correctement il me semble:

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Dim FileP as Workbook,
Dim DateDebutP as Long,
set FileP = ActiveWorkbook

Voilà si quelqu'un a une idée je suis preneur!
Merci d'avance

[BENNASR]

Bonsoir
j'arrive pas à comprendre ta requête !!
Merci de développer un peux le but à atteindre

[flagpara]

Bonsoir!

Désolé si ce n'est pas clair, je vais essayer d'expliciter un peu:

J'ai un user form avec 3 listbox: une pour le jour (01,02,03...31) une pour le mois (01,02,03...12) une pour l'année (2017,2018...2020)

Je veux ensuite trouver la date sélectionnée via cette userbox sur une ligne pleine de date.

Donc j'essaie Find(ListBox3.List(ListBox3.ListIndex) & "/" & ListBox4.List(ListBox4.ListIndex) & "/" & ListBox5.List(ListBox5.ListIndex))

C'est à dire la concaténation des valeurs de mes listbox avec les / pour avoir la date sous forme 01/01/2017

Et je veux mettre cette valeur (le numéro de la colonne correspondante) dans la variable DateDebutP
J'ai essayé avec et sans le ".value" à la fin de ma requête mais rien à faire j'ai le même message d'erreur :/


Voilà j'espère que c'est un peu plus clair!

[BENNASR]

Bonsoir

J'ai un user form avec 3 listbox: une pour le jour (01,02,03...31) une pour le mois (01,02,03...12) une pour l'année (2017,2018...2020)

désolé mais je comprends pas pourquoi tout ce usine à gaz pour enregistrer une date ???
alors qu'un controle calendar ou un Time Picker fait aisément l'affaire ??!

[flagpara]

Bonsoir

désolé mais je comprends pas pourquoi tout ce usine à gaz pour enregistrer une date ???
alors qu'un controle calendar ou un Time Picker fait aisément l'affaire ??!

Oh pour une raison toute simple: je suis complètement en autodidacte sur VBA et depuis à peine 2 semaines, donc quand j'ai un problème j'essaie de le résoudre avec mes outils et mes connaissances même si c'est vrai que ça fait un peut usine à gaz xD

Dans la boîte à outil du userform je n'ai rien vu qui ressemble à un calendar, ce que j'ai trouvé de mieux c'est les listes déroulantes :/

Ceci dit ça ne change rien non? Si je trouvais un calendar je me retrouverais avec la même requête juste en remplaçant la concaténation par la valeur du calendar non?

[BENNASR]

non plus... tu trouveras un calendrier prête à utiliser...tu n'as qu'à choisir la date
cherche à télécharger DTPicker tu aura le bonheur
Moi aussi débutant et autodidacte ... et si tu veux tu peux