Calcul dans userform

bonsoir a tout le forum

est il possible de faire un calcul dans l'userform

par exemple dans une case je rentre une date de naissance et dans une case a coté automatiquement il met l'age de la personne

d'avance merci

Bonjour

Tu veux l'âge sous quel format ?

@+Jean-Marie

disons que j'ai une case ou j'indique la date de naissance et automatiquement dans une case a cote l'age de la personne apparait

merci

Re

Je voulais dire 10 ans 2 mois 4 jours ?

@+Jean-Marie

beaucoup plus simple

directement l'age ex 32 ans

merci pour vos réponse rapide

Salut le forum

Regarde pour adapter ceci à ton fichier

Private Sub UserForm_Initialize()
TextBox1.Text = "01-01-2006"
Me.TextBox2.Text = Format(Date - CDate(TextBox1), "yy")
End Sub

Mytå

bonjour myta et au forum

je viens de mettre le code en l'adaptant

tout fonctionne sauf qu'il indique dans le textbox la date du code, or je veux que l'age change en fonction de la date qu'on saisie dans la textbox

si je ne mets rien dans le code de la textbox il refuse d'activer l'useform

merci de m'aiguiller

kaach

Salut le forum

Code sur la sortie d'un TextBox

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If CDate(TextBox1.Text) Then TextBox2.Text = Format(Date - CDate(TextBox1), "yy") & " ans"
End Sub

Mytå