Date d'echeance automatique sur userform excel

lol1304 Messages postés 10 Date d'inscription   Statut Membre Dernière intervention   -  
lol1304 Messages postés 10 Date d'inscription   Statut Membre Dernière intervention   -
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

1 réponse

jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
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   Statut Membre Dernière intervention  
 
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