Date d'echeance automatique sur userform excel

Fermé
lol1304 Messages postés 10 Date d'inscription samedi 12 septembre 2020 Statut Membre Dernière intervention 27 janvier 2021 - 17 janv. 2021 à 16:10
lol1304 Messages postés 10 Date d'inscription samedi 12 septembre 2020 Statut Membre Dernière intervention 27 janvier 2021 - 17 janv. 2021 à 18:45
Bonjour à tous,
voici mon probleme que bien entendu j'ai cherché sur le forum sans resultat...

j'ai un userform1 dans lequel j'entre par le biais de la combobox1 (dont la source est un tableau), un délais de paiement (comptant, à 30 jours fin de mois, etc...) et dans la textbox4 la date de départ,

j'aimerai que la date d'échéance (de paiement) soit calculée et insérée automatiquement dans la textbox8,

d'avance merci pour vos contributions.


Configuration: Windows / Chrome 87.0.4280.141
A voir également:

1 réponse

jordane45 Messages postés 38144 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 21 avril 2024 4 650
Modifié le 17 janv. 2021 à 17:01
Bonjour,

Il faut que tu utilises l'évènement change sur ta combobox
Private Sub ComboBox1_Change()


dedans, à l'aide de IF/ELSE ou d'un SWITCH CASE, tu détermines la durée à ajouter à ta date de départ en fonction de la valeur sélectionnée dans ta combobox
puis, tu ajoutes cette durée à ta date de départ
https://docs.microsoft.com/fr-fr/office/vba/language/reference/user-interface-help/dateadd-function
Et enfin, tu mets cette valeur dans la textbox8.



0
lol1304 Messages postés 10 Date d'inscription samedi 12 septembre 2020 Statut Membre Dernière intervention 27 janvier 2021
17 janv. 2021 à 18:45
Merci pour ta réponse ,
pour info, je suis debutant en VB mais je croi avoir compris ton idée,

mais serait il possible plutôt de déterminer la durée dans une nouvelle colonne a mon tableau source de la combo et en extraire les éléments de calcul pour le vba.
0