Userform - Calcul automatique de date

Re : Userform - Calcul automatique de date

Bonjour wizard0147,

Tu sais sans doute que ce que tu encodes dans un TextBox est .. du texte Partant de là, ajoute (avant le test de ton OptionButton1) un petit Dt sera donc une variable qui contiendra le contenu de ton TextBox, sous forme de vraie date. Attention, cette instruction provoquera une erreur, si ce qui est saisi dans la zone de texte n'est pas une date!


Une fois cette manipulation réalisée, le calcul de l'échéance à un an pourrait se faire en ajoutant 365, mais si tu as besoin de calculer une date précise, même les années bisextiles, tu peux écrire:
Je te laisse trouver le mode de calcul pour l'échéance à deux ans

Tu nous diras si ça fonctionne comme tu veux?

Re : Userform - Calcul automatique de date

Désolé, je débute en VBA. En fait, j'adapte du code que je trouve sur la toile
J'ai fait les modifications et ça marche super !

Un grand merci pour ton aide

Re : Userform - Calcul automatique de date

Bonsoir wizard0147, Modeste

Une autre solution est d'utiliser la fonction Ce lien n'existe plus qui permet d'ajouter à une date des secondes, minutes, heures, jours, semaines, mois, trimestres et années.


A+

Re : Userform - Calcul automatique de date

Salut mromain

C'est gentil de (re)venir pour nous distiller les nouveautés de 2013

Re : Userform - Calcul automatique de date

Coucou Modeste

Le lien d'aide vient effectivement du F1 d'un office 2013.
Par contre, je crois que DateAdd est intrinsèque à Ce lien n'existe plus. Sa notation complète est VBA.DateTime.DateAdd.
DateTime contient plein de fonctions de manipulation de dates qui sont très pratiques.

Bonne soirée

A+