XL 2019 Formule sur date dans TextBox

[ced91300]

Bonjour à tous,

Je cherche à reproduire une formule que j'ai déjà dans un tableau (=MOIS.DECALER(A1;B1) mais là, en vba via des TextBox

Textbox1 = la date que je rentre manuellement ex "26/01/1970"
TextBox2 = le nombre de mois de validité que je rentre manuellement ex "12"
TextBox3 = le résultat obtenu qui devrait être le 26/01/1971

Par avance merci de votre aide

Cordialement

Cédric

 

[TooFatBoy]

Bonjour,

Peut-être quelque chose comme ceci :

Me.TextBox3.Value = DateSerial(Year(Me.TextBox1.Value), Month(Me.TextBox1.Value) + Me.TextBox2.Value, Day(Me.TextBox1.Value))

 

[ced91300]

Bonjour,

Peut-être quelque chose comme ceci :

Me.TextBox3.Value = DateSerial(Year(Me.TextBox1.Value), Month(Me.TextBox1.Value) + Me.TextBox2.Value, Day(Me.TextBox1.Value))

Bonsoir et désolé pour mon temps de réponse, ta solution fonctionne nickel.
merci de ton aide.
Cordialement