Discussion :

[tools]

Bonjour,

Tout d'abord merci de vous intéresser à mon sujet.

J'ai un classeur avec deux feuille excel, lorsque j'appuie sur un bouton sur la première feuille, une from s'affiche, je rentre un date.
Jusque la pas de souci.
Le problème c'est que maintenant j'aimerais trouver le numero de la semaine qui concerne la date et mettre une croix dans un tableau des semaine en feuille 2.
J'espère mettre bien expliqué.

D'avance merci.

Cordialement.

Ci joint un fichier.

[mercatog]

Bonjour
regarde l'aide sur DateDiff

Exemple sur ton fichier

Code :

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

1
2
3
4
5
 
Dim Sem As Byte
 
Sem = DatePart("ww", CDate(Me.TextBox1.Value), vbMonday, vbFirstFourDays)
Sheets("Sheet2").Cells(2, Sem + 1).Value = "X"

PS: Regarde cet excellent tuto d'Ormonth sur les dates

[tools]

Merci beaucoup de mettre venu en aide c'est exactement ce que je cherchais à faire.
Merci aussi pour la rapidité de réponse.
Bien cordialement