IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

[Fonction]Comment décider que la semaine 1 ne soit pas la 1er semaine de janvier


Sujet :

VBA Access

  1. #1
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    63
    Détails du profil
    Informations personnelles :
    Âge : 41
    Localisation : France, Rhône (Rhône Alpes)

    Informations forums :
    Inscription : Juillet 2006
    Messages : 63
    Points : 31
    Points
    31
    Par défaut [Fonction]Comment décider que la semaine 1 ne soit pas la 1er semaine de janvier
    Bonjour,

    Je cherche à savoir comment décider que la première semaine de l'année soit celle du 27/03/06 au 31/03/2006 et non la 13ème semaine comme normalement.

    En effet pour avoir le numéro de la semaine j'ai écris dans la requête :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Semaine: PartDate("ww";[BDREPDATE];2;2)
    Il trouve le numéro de la semaine "officielle".

    Donc pour décider que la semaine 1 sera du vendredi 31 mars 2006 au jeudi 6 avril 2006 je ne vois pas comment faire!

    Si vous avez une idée???

  2. #2
    Membre expérimenté

    Profil pro
    Inscrit en
    Juin 2003
    Messages
    1 229
    Détails du profil
    Informations personnelles :
    Localisation : Sénégal

    Informations forums :
    Inscription : Juin 2003
    Messages : 1 229
    Points : 1 579
    Points
    1 579
    Par défaut
    Tu peux pour cela créer une table T_Semaine(NumSemaine, LibelleSemaine, PeriodeSemaine, NuméroOfficiel)

    Ainsi tu définis la correspondance entre ton model et les données officielles.

  3. #3
    Membre du Club
    Inscrit en
    Mai 2003
    Messages
    63
    Détails du profil
    Informations forums :
    Inscription : Mai 2003
    Messages : 63
    Points : 67
    Points
    67
    Par défaut
    Tu devrais t'intéresser à la fonction *Format()* et plus particulierement à son option "firstweekofyear" ou tu devrais pouvoir sortir des constantes proposées.

    Sinon, reste la possibilité de calculer le numero de semaine
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    NumSemaine = format(now,"ww") - format(#27/03/2007#,"ww")

  4. #4
    Expert confirmé

    Profil pro
    Inscrit en
    Mai 2005
    Messages
    3 419
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2005
    Messages : 3 419
    Points : 4 297
    Points
    4 297
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
     
    Function masemaine(x As Date)
    Const moisdeb = 3
    Const jourdeb = 31
    If Month(x) > moisdeb Then
    masemaine = ((x - DateSerial(Year(x), moisdeb, jourdeb)) \ 7) + 1
    Else
    masemaine = ((x - DateSerial(Year(x) - 1, moisdeb, jourdeb)) \ 7) + 1
    End If
    End Function

Discussions similaires

  1. [XL-2007] Comment faire pour que 2010-01-01 ne soit pas converti en date
    Par pierrot10 dans le forum Excel
    Réponses: 4
    Dernier message: 09/04/2010, 14h46
  2. Réponses: 9
    Dernier message: 18/06/2009, 19h31
  3. Réponses: 3
    Dernier message: 03/10/2008, 12h48
  4. Réponses: 4
    Dernier message: 23/05/2007, 09h51
  5. Réponses: 3
    Dernier message: 17/05/2007, 19h30

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo