Microsoft 365 liste Déroulante avec Texbox en VBA

[aba2s]

Bonjour la communauté,

Je galère à mettre en place ceci :

Je souhaiterai qu'au clic sur le "bouton 1" que le pop up du "userform" me propose :

- sur IO Name : la liste des campagnes en colonne H
- sur Date antérieure à : un calendrier (qui me permettra de sélectionner une date).

Pourriez-vous s'il vous plait m'aider?

Merci

 

[Dranreb]

Bonjour.
Pour IO Name mettez une ComboBox pour pouvoir y associer une liste.
Pour le calendrier, un UFmCalend.Coupler

 

[aba2s]

Merci Dranreb,

Avec comboBox, j'ai la liste déroulante. Par contre je trouve très compliqué pour ce qui est la mise en place d'un calendrier.

Merci

 

[Dranreb]

Non. C'est très simple. Il suffit de le glisser/déplacer vers le projet VBA de votre classeur et d'utiliser sa méthode Coupler comme montré dans le petit UserForm1 de démonstration.

 

[bbb38]

Bonsoir Dranreb, le forum,
Je suis également intéressé par votre proposition de calendrier.
Cependant, à l’ouverture de votre fichier, j’ai le message suivant :
« Erreur d’exécution ‘9’ : L’indice n’appartient pas à la sélection ».
L’erreur est situé à la ligne « EstFérié(LaDate) = TFérié(LaDate) » de la fonction « Private Fonction EstFérié(ByVal LaDate As Date) As String » - Code : UFmCalend.
Vous remerciant par avance,
Cordialement,
Bernard

P.S. Mes remerciements à aba2s pour avoir posé cette question.

 

[Dranreb]

Devant la 1ère apparition de cette instruction il y a pourtant On Error Resume Next devant.
Si c'est celle ci qui plante, cochez 'Arrêt dans le module de classe' menu Outils, Options…, onglet Général, rubrique Récupération d'erreur.

 

[bbb38]

Bonjour Dranreb, le forum,

Devant la 1ère apparition de cette instruction il y a pourtant On Error Resume Next devant.

Effectivement, devant cette instruction, on trouve bien On Error Resume Next.

Si c'est celle ci qui plante, cochez 'Arrêt dans le module de classe' menu Outils, Options…, onglet Général, rubrique Récupération d'erreur.

J’ai réalisé les instructions ci-dessus, et l’erreur n’apparaît plus.
Merci pour ces informations. Maintenant, je vais essayer d’adapter votre calendrier à mes formulaires.
Bernard