Numéro du jour de la semaine

[deni29]

Bonjour à tous,

Ayant une date dans une cellule (exemple A1).
je souhaite en fonction du jour de la semaine (Lundi =1, mardi =2, .... dimanche = 7), effectuer une macro avec une condition en fonction de ce jour de semaine (j'espère être assés explisite) soit :

sub Semaine
dim Date
Date = Range("A1") ' exemple A1 = 6/12/2006 soit un mercredi (3)
Jour = JOURSEM(Date)
if Jour =3 then
......
end if
end sub

mon probléme est que le "JOURSEM" ne jonctionne pas, il y a-t-il une solution.

Merci d'avance

Deni29

 

[JYLL]

Re : Numéro du jour de la semaine

Bonsoir Denis 29 et le forum,

Il faut que tu précises, quel est le premier jour de la semaine avec le deuxième paramètre de la fonction:
De plus dans excel tu cliques sur "Outils" "Macros complémentaires" et tu coches:
Solveur , utilitaire d'analyse, utilitaire d'analyse VBA.

Bon test.

 

[michel_m]

Re : Numéro du jour de la semaine

bonsoir

VBa est en anglais... et date est un mot réservé!
journee=range("A1)
jour=Weekday(journee,vbmonday)
ou 2 au lieu de vbmonday
voir l'aide

 

[michel_m]

Re : Numéro du jour de la semaine

Et bing, collision: une bosse! Salut mon vieux Jean-Yves Ca va? (j'ai de l'arnica)

 

[JYLL]

Re : Numéro du jour de la semaine

Bonsoir Michel,

Pas de problème je ne risque pas d'avoir mal vu la dose de cachets que je prends. Les collisions c'est bon cela prouve la vie du forum.

Bonne soirée à toi.

 

[deni29]

Re : Numéro du jour de la semaine

Bonjour Michel_M, Le Forum

Merci beaucoup pour cette astus, Cela fonctionne trés bien.

@+

Deni29