XL 2019 Formule sur date dans TextBox

ced91300 · 22 Février 2023

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 · 22 Février 2023

Bonjour,

Peut-être quelque chose comme ceci :

Code:

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

TooFatBoy · 22 Février 2023

Bonjour,

Peut-être quelque chose comme ceci :

Code:

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

ced91300 · 28 Février 2023

TooFatBoy à dit:
Bonjour,

Peut-être quelque chose comme ceci :

Code:

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

XL 2019 Formule sur date dans TextBox

ced91300

XLDnaute Occasionnel

TooFatBoy

TooFatBoy

XLDnaute Barbatruc

ced91300

XLDnaute Occasionnel

Discussions similaires