[AC-2007] Renseigner le numéro de la semaine en auto

[jojo2311]

Bonjour
j ai créé une table dans laquelle les utilisateurs (via un formulaire) devront enregistrer les opérations traitées pendant la semaine.
J aimerai que pour chaque ligne soit renseigné le numéro de la semaine, mais pour simplifié un peu plus la saisie, j aimerai que le numéro de la semaine soit renseigné en auto. Avez vous une idée ? J ai bien entendu créé un champ week.

Merci pour votre aide

Jojo2311

[Domi2]

Bonjour,

Code :

1
2
3
4
5
6
Dim lngSemaine As Long
 
'Calcul automatique du numéro de semaine. Valeur par défaut = date système
'Norme ISO française. Le premier jour de la semaine est le lundi
'La première semaine de l'année est celle contenant le premier jeudi de l'année
lngSemaine = DatePart("ww", Date, vbMonday, vbFirstFourDays)

Comme tu n'es pas très précis sur la façon dont tu crées un nouvel enregistrement, il te faut adapter ce code à ta manière de procéder.

Domi2