Différence entre deux années sous vba
Résolu
Toums91
-
Toums91 -
Toums91 -
Bonjour à tous,
Je rencontre un problème pour faire la différence entre deux dates:
En effet l'une apparaît dans un textbox et l'autre serait celle d'aujourd'hui.
A titre d'exemple 2011-1980 (année affichée par la textbox).
Mon code serait le suivant :
If ACONCEPT < (Year(Date) - 7) Then
SURCOU_ANNEE = (TRAIT_OBSO - 2) * ((Year(Date) - ACONCEPT)</gras> ^ ((Sheets("parametres_obso").Range("C30")) * (Sheets("parametres_obso").Range("C31"))))
Else: SURCOU_ANNEE = ""
End If
En effet, le code affiché en gras indique une date entière alors que ACONCEPT renvoit uniquement une année
Merci d'avance.
Je rencontre un problème pour faire la différence entre deux dates:
En effet l'une apparaît dans un textbox et l'autre serait celle d'aujourd'hui.
A titre d'exemple 2011-1980 (année affichée par la textbox).
Mon code serait le suivant :
If ACONCEPT < (Year(Date) - 7) Then
SURCOU_ANNEE = (TRAIT_OBSO - 2) * ((Year(Date) - ACONCEPT)</gras> ^ ((Sheets("parametres_obso").Range("C30")) * (Sheets("parametres_obso").Range("C31"))))
Else: SURCOU_ANNEE = ""
End If
En effet, le code affiché en gras indique une date entière alors que ACONCEPT renvoit uniquement une année
Merci d'avance.
A voir également:
- Différence entre deux années sous vba
- Différence entre tcp et udp - Guide
- Nombre de jours entre deux dates excel - Guide
- Difference entre million et milliard - Accueil - Technologies
- Deux ecran pc - Guide
- Comment faire deux colonnes sur word - Guide
3 réponses
Bonjour,
Comprend pas !
Tu dis que ..ACONCEPT = "2011-1980"
Il y a deux années, que veux-tu exactement comme année à tester ?
A+
Comprend pas !
Tu dis que ..ACONCEPT = "2011-1980"
Il y a deux années, que veux-tu exactement comme année à tester ?
A+
AConcept, c'est le nom du textBox ?
et où est-il situé ?
sinon,
Si ton code est dans un module autre que l'emplacement du textBox il faut le situé.
Si sur UserForm
si sur feuille
Toute la connaissance du monde ne peu tenir dans une seul tête (moi)
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
NOTE : Je ne répond pas aux MP pour les questions techniques.
Ça doit se passer sur le forum pour que tous puisse y participer ou en profiter.
et où est-il situé ?
sinon,
If TextBox1.value < (Year(Date) - 7) Thenfonctionne parfaitement.
Si ton code est dans un module autre que l'emplacement du textBox il faut le situé.
Si sur UserForm
If NomDuUF.TextBox1.value < (Year(Date) - 7) Then
si sur feuille
If Sheets("NomFeuille").TextBox1.value < (Year(Date) - 7) Then
Toute la connaissance du monde ne peu tenir dans une seul tête (moi)
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
NOTE : Je ne répond pas aux MP pour les questions techniques.
Ça doit se passer sur le forum pour que tous puisse y participer ou en profiter.
AConcept vaut 1980 et Year(Date) devrait prendre l'année du moment, n'est ce pas?
ET ainsi le résultat serait de 2011-1980 = 31