Recherche macro intervalle temps

[BRUNO62]

Bonsoir,

Besoin aide, par avance merci.

Je cherche une macro qui me donnerait la condition :

Si la date affichée est compris entre janv et mars le résultat serait T1
Si la date affichée est compris entre mars et juin le résultat serait T2
Si la date affichée est compris entre juin et sept le résultat serait T3
Si la date affichée est compris entre sept et déc le résultat serait T3

A+

 

[kjin]

Re : Recherche macro intervalle temps

bonsoir,

Sub DateTrimestre()
Dim TheDate As Date, Msg
TheDate = InputBox("Entrez une date:")
Msg = "Trimestre " & DatePart("q", TheDate)
MsgBox Msg
End Sub

A+
kjin

 

[Staple1600]

Re : Recherche macro intervalle temps

Bonsoir BRUNO62, kjin, le fil, le forum

Si la date affichée

Affichée ou ?

Dans un cellule ? si oui laquelle ?

Dans un Userform ?

Sinon pas besoin de macro ... une formule peut suffire
Avec une date en A1, et cette formule en B1 par exemple

="T"&ENT((MOIS($A$1)-1)/3)+1

 

[BRUNO62]

Re : Recherche macro intervalle temps

Bonjour le forum,

Merci à kjin,Staple1600
A+