Discussion :

[harisman87]

Bonjour!

Je suis en train de créer des fonctions pour gérer des lots qui sont régit par des dates et aussi par le numéro de la semaine.
Donc là je sèche sur la conversion des dates en jours (ex: 02/02 = 33), je n'arrive pas à trouver de fonctions ou la phase de calcul à faire pour ensuite prendre la valeur puis la convertir en semaine.

J'utilise des dates sous le format 05/02/2010 et je suis sur excel 2003

[MarcelG]

Bonjour,

Sans macro VBA,
Voir le tutoriel de Silkyroad, riches en exemples

http://silkyroad.developpez.com/Exce...ionsExcel/#LVI

il y est donné

=AUJOURDHUI()-DATE(ANNEE(AUJOURDHUI());1;0)

adapté à ton cas

=DATE(2010;2;2)-DATE(2010;1;0)

Cordialement

Marcel

[tototiti2008]

Bonjour harisman87,

en VBA ou en formule ?

[harisman87]

VBA svp désolé j'ai oublié

[MarcelG]

Je croyais que tu voulais une simple formule. Mais tu peux transformer celle-ci en fonction VBA.

D'autre part, pour ce qui est du numéro de semaine, si cela peut t'aider, dans une précédente discussion, j'ai noté

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Public Sub Numéro_de_semaine()
Dim NumSem As Integer, Annee As Integer
Set TxtDate1 = Range("A1")
NumSem = DatePart("ww", TxtDate1, 2, 2)
Annee = IIf(NumSem >= 52 And Month(TxtDate1) = 1, -1, 0) + Year(TxtDate1)
TxtSemaine = "S" & Right(Annee, 2) & Format(NumSem, "00")
Range("A2") = TxtSemaine
End Sub

Source : discussion Développez.net, initiée par MichaSarah

« Comment afficher un n° de semaine en fonction d' une date »

Nota : Ici, le 2ème argument de DatePart a été modifiée de 3 en 2 (solution de Mercatog)

En espérant que cela te sera utile.

Cordialement.

Marcel.

[harisman87]

Merci beaucoup, le code marche parfaitement, merci encore