DTPicker

Pierrot93

XLDnaute Barbatruc

• 25 Octobre 2010

• #2

Re : DTPicker

Bonjour,

essaye ceci, si j'ai bien compris :

pour les mois

Code:

MsgBox DateDiff("m", DTPicker1.Value, DTPicker2.Value, 2, 2)

pour les semaines

Code:

MsgBox DateDiff("ww", DTPicker1.Value, DTPicker2.Value, 2, 2)

bonne journée
@+

 

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 25 Octobre 2010

• #3

Re : DTPicker

Re,

Merci Pierrot 93

Mais je ne suis pas arrivé à l'envoyer dans la texbox
si tu peux m'arranger sa j'ai joint mon fichier
Merci beaucoup d'avance

@+
bonne journée

 

Pièces jointes

• DTPicker.xlsm

  19.4 KB · Affichages: 106
• DTPicker.xlsm

  19.4 KB · Affichages: 109
• DTPicker.xlsm

  19.4 KB · Affichages: 112

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 25 Octobre 2010

• #4

Re : DTPicker

Re,

pas 2007, je ne peux donc ouvrir ton fichier, mais ceci devrait convenir :

Code:

TextBox1.Value = DateDiff("m", DTPicker1.Value, DTPicker2.Value, 2, 2)
TextBox2.Value = DateDiff("ww", DTPicker1.Value, DTPicker2.Value, 2, 2)

 

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 25 Octobre 2010

• #5

Re : DTPicker

Re,

Non j'ai du faire ceci:
TextBox2 = DateDiff("m", DTPicker1.Value, DTPicker2.Value, 2, 2) & " Mois"
TextBox3 = DateDiff("ww", DTPicker1.Value, DTPicker2.Value, 2, 2) & " Semaine"
Si je n’abuse pas trop de to temps, est-il possible de le faire en année, heure, minute et seconde

Merci beaucoup

@+
Max

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 25 Octobre 2010

• #6

Re : DTPicker

Re,

touche de fonction F1 sur le mot "DateDiff" dans l'éditeur vba te donnera les différentes valeurs possibles pour l'argument "interval"

 

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 25 Octobre 2010

• #7

Re : DTPicker

Re,

Je te remerci Pierrot93 j'ai tous trouvé

Cordialement

Max

 

Vote positif 0 Vote négatif