Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic Problème de numéro de semaine ???

Problème de numéro de semaine ???

33 réponses
Avatar
LE TROLL
Bonjour,

Je n'arrive pas à avoir la bonne semaine aux extrêmes:

- J'utilise le format (ww)
- La semaine se change le lundi
- Donc à la fin de l'année il peut y avoir une semaine 53
qui passe même au début de l'autre année...
- Donc encore, pas de semaine 1 avant l'année suivant...
- Heu, c'est comme ça, désolé...

Dans Excel j'utilise ce calcul (qui fonctionne), mais je
n'y comprends rien, recopiage, lol:
=ENT((C2-SOMME(MOD(DATE(ANNEE(C2-MOD(C2-2;7)+3);1;2);{1E+99;7})*{1;-1})+5)/7)
C2 étant la date du jour
---------------

Mais là en VB, je n'arrive pas à retranscrire ces signes
cabalistiques...

Alors si quelqu'un a une idée de calcul avec ma semaine
53 ???

Merci, au revoir et à bientôt :o)
--
ECRIRE AU TROLL http://irolog.free.fr/letroll/index.html
------------------------------------------------------------
LE TROLL, éleveur de trolls depuis César, qui disait :
Avec une hache, celui qui tient le manche a toujours raison
!
Signaler un problème avec ce contenu

10 réponses

Supprimer
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
1 2 3 4
Avatar
LE TROLL
Ça ne marche pas du tout!!!

Ça donne la semaine de la date système... certes... mais
du genre 30,7 (ça je peux le résoudre mathématiquement)

Mais ma formule (recopiée et incomprise d'Excel),
donnait la semaine par rapport à une date X, et non pas la
date système, à moins que les 2 ne correspondent, soit:
=ENT((C2-SOMME(MOD(DATE(ANNEE(C2-MOD(C2-2;7)+3);1;2);{1E+99;7})*{1;-1})+5)/7)
C2 = madate

Sans tout comprendre, c'est bien ce que je disais, il
faut un élément varible, ou que je mets la variable dans
cette formule cabalistique ???

Tu vois Loïc, t'es sympa, et ça me fait avancer, mais si
tu lisais bien ma question et que tu testais, on irait plus
vite (je suis ici en VB5 :o)

???
-----------------
Avatar
scraper
Bonjour LE TROLL, dans le message
news:
tu disais :


Tu vois Loïc, t'es sympa, et ça me fait avancer, mais si
tu lisais bien ma question et que tu testais, on irait plus
vite (je suis ici en VB5 :o)



t'es toujour aussi sympa, et c'est un réel plaisir que d'essayer de te venir
en aide :-(






--

Adresse invalide
Merci de répondre sur le forum ...
http://scraper.chez.tiscali.fr

scraper
Avatar
LE TROLL
Laisse tomber tu ne connais pas!!!

Pour ta gouverne, il a bouffé la moitié de mon texte, je
disais que j'étais en vb5, je disais que j'avais une
variable date modifiable, du premier élément il n'en a tenu
compte qu'à la fin, du second pas encore... Donc s'il avait
lu posément et testé, nous aurions déjà fini, à moins qu'il
me dise qu'il ne sait pas...

Mais de toute façon, perds l'habitude en extrayant du
contexte un texte, de le commenter afin de polémiquer
dessus... Aider c'est bien, mais si on sait, sinon ça fait
l'effet contraire, mieux vaut passer...

Alors quand tu me réponds, c'est juste pour améliorer
une réponse dont tu es certain, sinon, ne mets pas tes
bafouilles dans mes réponses, si tu as envie d'écrire tu
poses une question, et tu t'y réponds... ça occupe...

Tu vas quand en vacances??? Je te Conseil l'Irak, ils
font des prix imbattables tu sais :o)
-------------
Avatar
scraper
Bonjour LE TROLL, dans le message
news:%
tu disais :


snip ta prose affligeante ...
Je laisse à Loïc le soin d'en tirer les conclusions qui s'imposent !


Tu vas quand en vacances??? Je te Conseil l'Irak, ils
font des prix imbattables tu sais :o)



tu vas pas recommencer, dis ?

je croyais que ton FAI t'avait prévenu ??

attention, cette fois ci tu risques gros ;-)


en conséquences, je te recommende vivement de modérer tes ardeurs quand tu
me réponds, d'éviter ce genre d'allusions stupides, et de rester courtois


à bon entendeur ....



--

Adresse invalide
Merci de répondre sur le forum ...
http://scraper.chez.tiscali.fr

scraper
Avatar
Loïc
GRENADE!!!!!!!!!!!!!


LE TROLL a formulé la demande :
Laisse tomber tu ne connais pas!!!

Pour ta gouverne, il a bouffé la moitié de mon texte, je disais que
j'étais en vb5, je disais que j'avais une variable date modifiable, du


C'est pas vrai ça! Il m'a fallu lire un de tes précédents messages pour
m'en rendre compte.
premier élément il n'en a tenu compte qu'à la fin, du second pas encore...
Donc s'il avait lu posément et testé, nous aurions déjà fini, à moins qu'il
me dise qu'il ne sait pas...


j'ai testé et j'ai même ouvert un nouveau projet vb pour te venir en
aide.
En fait j'avais pas très bien compris ta question.

Mais de toute façon, perds l'habitude en extrayant du contexte un texte,
de le commenter afin de polémiquer dessus... Aider c'est bien, mais si on
sait, sinon ça fait l'effet contraire, mieux vaut passer...

Alors quand tu me réponds, c'est juste pour améliorer une réponse dont tu
es certain, sinon, ne mets pas tes bafouilles dans mes réponses, si tu as
envie d'écrire tu poses une question, et tu t'y réponds... ça occupe...


Tu brodes encore mieux que ma grand mère.
Tu vas quand en vacances??? Je te Conseil l'Irak, ils font des prix
imbattables tu sais :o)


C'est super comme paroles ça pour un ancien militaire!
-------------



Tu devrais également te reposer un peu. Tu as l'air un peu tendu là non
? Comme destination je te conseil Walibi. Tu verras le kangourou est
super sympa et pour 6¤ tu peux te faire prendre en photo avec lui.
N'oublie surtout pas le spectacle d'otaries. Mais pendant la
représentation, chut! Pas un mot !
Aller, laisse VB c'est encore trop compliqué pour toi. Tu peux essayer
le logo (j'en ai fait au CE1 et ça devrait te plaire, aucun bug!).
Plutôt que de te faire chier à étudier le latin pour épater tes copains
tu devrais te payer de bons cours de civisme pour ex-militaires fachos
et frustrés que tu sembles être.



Sinon, pour la réponse à ta question: http://www.vtff.fr.st


Mais je te pardonne... "l'horreur est humaine" (désolé google fait pas
francais => Latin)

A+

--
Loïc
Avatar
Modeste
Bonsour®
Joseph Attila wrote:
Laisse tomber tu ne connais pas!!!


;o))) déja signalé :
http://minilien.com/?mpV3shYIpP

chez les nuls y'en a qui utilisent ...
NoSemaine = ENT(MOD(ENT((Unedate-2)/7)+0.6;52+5/28))+1

BOGUE : Les fonctions Format et DatePart peuvent renvoyer un numéro de
semaine erroné pour le Dernier lundi de l'année.

de l'info là :
http://support.microsoft.com/default.aspx?scid=kb;FR;q200299

--
n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr
Avatar
Alfred
"LE TROLL" <le a écrit dans le message de
news:
Bonjour,

Je n'arrive pas à avoir la bonne semaine aux extrêmes:

- J'utilise le format (ww)
- La semaine se change le lundi
- Donc à la fin de l'année il peut y avoir une semaine 53
qui passe même au début de l'autre année...
- Donc encore, pas de semaine 1 avant l'année suivant...
- Heu, c'est comme ça, désolé...

Dans Excel j'utilise ce calcul (qui fonctionne), mais je
n'y comprends rien, recopiage, lol:



=ENT((C2-SOMME(MOD(DATE(ANNEE(C2-MOD(C2-2;7)+3);1;2);{1E+99;7})*{1;-1})+5)/7
)
C2 étant la date du jour
---------------

Mais là en VB, je n'arrive pas à retranscrire ces signes
cabalistiques...

Alors si quelqu'un a une idée de calcul avec ma semaine
53 ???

Merci, au revoir et à bientôt :o)
--
ECRIRE AU TROLL http://irolog.free.fr/letroll/index.html
------------------------------------------------------------
LE TROLL, éleveur de trolls depuis César, qui disait :
Avec une hache, celui qui tient le manche a toujours raison
!





Bonjour
voici la formule que j'utilise pour savoir s'il y a 53 semaines dans
l'année:

Private Sub VoirS53()
Dim Lsem1 As Integer
Dim JourDeDebut As Date

s53 = False
'1er janvier de l'année en cours (ThisYear) -> n° jour
JourDeLan = DateSerial(ThisYear, 1, 1)

Lsem1 = Weekday(JourDeLan)
'Test si 53 semaines dans l'année
If Lsem1 = 5 Then s53 = True 'jeudi

End Sub
Alfred
Avatar
Jean-Marc
Une fois n'est pas coutume, je top-poste:

http://membres.lycos.fr/jeanmarcn/trollthemup.htm

La version est 3.5 est une merveille :-)))))))))))

--
Jean-marc
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ;


"scraper" a écrit dans le message de
news:
Bonjour LE TROLL, dans le message
news:%
tu disais :


snip ta prose affligeante ...
Je laisse à Loïc le soin d'en tirer les conclusions qui s'imposent !

>
> Tu vas quand en vacances??? Je te Conseil l'Irak, ils
> font des prix imbattables tu sais :o)

tu vas pas recommencer, dis ?

je croyais que ton FAI t'avait prévenu ??

attention, cette fois ci tu risques gros ;-)


en conséquences, je te recommende vivement de modérer tes ardeurs quand tu
me réponds, d'éviter ce genre d'allusions stupides, et de rester courtois


à bon entendeur ....



--

Adresse invalide
Merci de répondre sur le forum ...
http://scraper.chez.tiscali.fr

scraper



Avatar
LE TROLL
Merci :o)
Avatar
LE TROLL
Une fois est plus que coutume pour toi, je croyais que
tu ne voyais pas mes question!
1 2 3 4