Je cherche à calculer le numéro de la semaine dans une année 1 à 52
Les exemples ne me satisfont pas, car la semaine 53 est mal gérée, en
effet, pour l'année N on peut dire si semaine 53 = semaine 1, mais là, ça
décale tout à l'année N+1, on se retrouve avec + 1 semaine, du fait que l'on
est parti l'année N à 1...
Normalement, un an n'ayant que 52 semaines, à la semaine 53 de l'année,
on la passe à 1, mais si cette semaine chevauche les 2 années, elle doit
conserver sa valeur jusqu'à son septième jour, par exemple:
jour
30/2003 = semaine 53 = semaine 1
31/2003 = semaine 53 = semaine 1
1 à 5/2004 = emaine 1 (changement d'année)
Voici ce que j'ai fait, mais ça ne mache pas:
For i = 1 To 7
date = Format(i, "00") & "/01/" & 2003 ' recherche date 1er lundi
nouvelle année
nu_j = format(Weekday(periode),"00") ' charge le n° du jour (1=dim, 2
lundi...)
If nu_j = 2 Then Exit For ' si nu_j est lundi = 2 : sort
Next i
If nu_j > au jour de la date Then ' si nu_j (1er lundi) est supérieur au
jour de la date = semaine 1
semaine = 1
Else
semaine = ((numéro du jour - nu_j) / 7) + 1 ' numéro du jour -
valeur 1er lundi / 7 + 1 = semaine en cours
End If
FAUX FAUX FAUX
Si vous avez une idée, merci, au revoir et à bientôt.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Fox Trot
Bonjour/soir à tous, Joseph PUSZTAY a écrit :
Bonjour,
Je cherche à calculer le numéro de la semaine dans une année 1 à 52
format$(now,"ww")-> renvoie le numéro de la semaine de Now (date actuelle) -- @+ sur ce forum Fox Trot () Enlever les "pasdepub" de mon adresse
Bonjour/soir à tous, Joseph PUSZTAY a écrit :
Bonjour,
Je cherche à calculer le numéro de la semaine dans une année 1 à
52
format$(now,"ww")-> renvoie le numéro de la semaine de Now (date actuelle)
--
@+ sur ce forum
Fox Trot (fox.pasdepub@tiscali.pasdepub.fr)
Enlever les "pasdepub" de mon adresse
Je cherche à calculer le numéro de la semaine dans une année 1 à 52
format$(now,"ww")-> renvoie le numéro de la semaine de Now (date actuelle) -- @+ sur ce forum Fox Trot () Enlever les "pasdepub" de mon adresse
Joseph PUSZTAY
Bonjour, oui, certes, merci, mais si justement on doit calculer une semaine qui n'est pas dans "now" ( la date actuelle), est-que: dim semaine as string: now = date_X: semaine = format(now,"ww")
Ça marche ??? Ou:
dim semaine as string: semaine = format(date_X,"ww")
Est-ce que ça, ça marche ???
Sinon, c'est quoi le format "WW" "W" = quoi ?
Merci, à +, bye, Joe. ---------------------------fin à moi--------------
"Fox Trot" a écrit dans le message de news:bk1tnc$mpn$
Bonjour/soir à tous, Joseph PUSZTAY a écrit :
> Bonjour, > > Je cherche à calculer le numéro de la semaine dans une année 1 à > 52
format$(now,"ww")-> renvoie le numéro de la semaine de Now (date actuelle) -- @+ sur ce forum Fox Trot () Enlever les "pasdepub" de mon adresse
Bonjour, oui, certes, merci, mais si justement on doit calculer une
semaine qui n'est pas dans "now" ( la date actuelle), est-que:
dim semaine as string: now = date_X: semaine = format(now,"ww")
Ça marche ???
Ou:
dim semaine as string: semaine = format(date_X,"ww")
Est-ce que ça, ça marche ???
Sinon, c'est quoi le format "WW" "W" = quoi ?
Merci, à +, bye, Joe.
---------------------------fin à moi--------------
"Fox Trot" <fox.pasdepub@tiscali.pasdepub.fr> a écrit dans le message de
news:bk1tnc$mpn$1@news.tiscali.fr...
Bonjour/soir à tous, Joseph PUSZTAY a écrit :
> Bonjour,
>
> Je cherche à calculer le numéro de la semaine dans une année 1 à
> 52
format$(now,"ww")-> renvoie le numéro de la semaine de Now (date actuelle)
--
@+ sur ce forum
Fox Trot (fox.pasdepub@tiscali.pasdepub.fr)
Enlever les "pasdepub" de mon adresse
Bonjour, oui, certes, merci, mais si justement on doit calculer une semaine qui n'est pas dans "now" ( la date actuelle), est-que: dim semaine as string: now = date_X: semaine = format(now,"ww")
Ça marche ??? Ou:
dim semaine as string: semaine = format(date_X,"ww")
Est-ce que ça, ça marche ???
Sinon, c'est quoi le format "WW" "W" = quoi ?
Merci, à +, bye, Joe. ---------------------------fin à moi--------------
"Fox Trot" a écrit dans le message de news:bk1tnc$mpn$
Bonjour/soir à tous, Joseph PUSZTAY a écrit :
> Bonjour, > > Je cherche à calculer le numéro de la semaine dans une année 1 à > 52
format$(now,"ww")-> renvoie le numéro de la semaine de Now (date actuelle) -- @+ sur ce forum Fox Trot () Enlever les "pasdepub" de mon adresse
Sebho
dim MaDate as date dim res as long
MaDate="15/08/2004" res=format( MaDate,"ww")
sebho
"Joseph PUSZTAY" a écrit dans le message de news:
Bonjour, oui, certes, merci, mais si justement on doit calculer une semaine qui n'est pas dans "now" ( la date actuelle), est-que: dim semaine as string: now = date_X: semaine = format(now,"ww")
Ça marche ??? Ou:
dim semaine as string: semaine = format(date_X,"ww")
Est-ce que ça, ça marche ???
Sinon, c'est quoi le format "WW" "W" = quoi ?
Merci, à +, bye, Joe. ---------------------------fin à moi--------------
"Fox Trot" a écrit dans le message de news:bk1tnc$mpn$ > Bonjour/soir à tous, Joseph PUSZTAY a écrit : > > > Bonjour, > > > > Je cherche à calculer le numéro de la semaine dans une année 1 à > > 52 > > format$(now,"ww")-> renvoie le numéro de la semaine de Now (date
actuelle)
> -- > @+ sur ce forum > Fox Trot () > Enlever les "pasdepub" de mon adresse > >
dim MaDate as date
dim res as long
MaDate="15/08/2004"
res=format( MaDate,"ww")
sebho
"Joseph PUSZTAY" <montmartre75@noos.fr> a écrit dans le message de
news:uiilzk2eDHA.1748@TK2MSFTNGP10.phx.gbl...
Bonjour, oui, certes, merci, mais si justement on doit calculer une
semaine qui n'est pas dans "now" ( la date actuelle), est-que:
dim semaine as string: now = date_X: semaine = format(now,"ww")
Ça marche ???
Ou:
dim semaine as string: semaine = format(date_X,"ww")
Est-ce que ça, ça marche ???
Sinon, c'est quoi le format "WW" "W" = quoi ?
Merci, à +, bye, Joe.
---------------------------fin à moi--------------
"Fox Trot" <fox.pasdepub@tiscali.pasdepub.fr> a écrit dans le message de
news:bk1tnc$mpn$1@news.tiscali.fr...
> Bonjour/soir à tous, Joseph PUSZTAY a écrit :
>
> > Bonjour,
> >
> > Je cherche à calculer le numéro de la semaine dans une année 1 à
> > 52
>
> format$(now,"ww")-> renvoie le numéro de la semaine de Now (date
actuelle)
> --
> @+ sur ce forum
> Fox Trot (fox.pasdepub@tiscali.pasdepub.fr)
> Enlever les "pasdepub" de mon adresse
>
>
Bonjour, oui, certes, merci, mais si justement on doit calculer une semaine qui n'est pas dans "now" ( la date actuelle), est-que: dim semaine as string: now = date_X: semaine = format(now,"ww")
Ça marche ??? Ou:
dim semaine as string: semaine = format(date_X,"ww")
Est-ce que ça, ça marche ???
Sinon, c'est quoi le format "WW" "W" = quoi ?
Merci, à +, bye, Joe. ---------------------------fin à moi--------------
"Fox Trot" a écrit dans le message de news:bk1tnc$mpn$ > Bonjour/soir à tous, Joseph PUSZTAY a écrit : > > > Bonjour, > > > > Je cherche à calculer le numéro de la semaine dans une année 1 à > > 52 > > format$(now,"ww")-> renvoie le numéro de la semaine de Now (date
actuelle)
> -- > @+ sur ce forum > Fox Trot () > Enlever les "pasdepub" de mon adresse > >