Encore les jours

[ninou58]

bonjour à tous!!! 🙂

J'ai toujours des petits soucis avec les jours, numéros et lettres.

Donc en faite disons que j'ai:
recup='Mercredi'

Et j'aimerais pouvoir récupérer le jour en numéro ici 3.

j'ai réussi à faire l'inverse de 3 à mercredi mais la je sais pas.

Merci d'avance

 

[AV]

Ave,


=EQUIV(A1;{'Lundi';'Mardi';'Mercredi';'Jeudi';'Vendredi';'Samedi';'Dimanche'};0)

AV [MVP Excel]

 

[pat1545.]

Salut,

avec 2 colonnes:
col1 col2
Lundi 1
Mardi 2
etc..
en D2:
=recherchev(A2;tbl;2;faux)

tbl est l'ensemble des 2 colonnes par insertion/nom/definir
A2 est la cellule où se trouve ton mois (en respectant l'orthographe !!!)

Bye

 

[ninou58]

Ca fonctionne bien pour excel mais vba?
Ca a pas l'air.
Désolé si j'ai pas précisé.

Salut pat!
Je ne peux pas faire de tableau. Il me faudra trouver une autre solution. Et c'est sous vba donc non.
Merci quand même.
:silly:

Message édité par: ninou58, à: 03/04/2006 14:14

 

[pat1545.]

sorry Alain , pas rafraichit (il fait déjà frisquet ainsi 🙂

Patrick

 

[AV]

récup = 'mercredi'
x = Array('Lundi', 'Mardi', 'Mercredi', 'Jeudi', 'Vendredi', 'Samedi', 'Dimanche')
MsgBox Application.Match(récup, x, 0)

AV [MVP Excel]

 

[pierrejean]

bonjour ninou

ave av

salut patrick

en vba une petite fonction

Function numjour(jour As String)
For n = 1 To 7
If WeekdayName(n) = jour Then numjour = n
Next n
End Function

 

[AV]

'...pas rafraichit (il fait déjà frisquet ainsi 🙂...'

Une soluce : migrer vers le Sud !

AV

 

[pat1545.]

ça Alain, c'est pour la (pré)pension !
j'y pense déjà

 

[ninou58]

Merci pour vos réponses! Je vais pouvoir continuer ma route 🙂 .
bon si on peut aller dans le sud,je dirais pas non.
🙂

Bonne journée
Et encore merci

Message édité par: ninou58, à: 03/04/2006 14:36

 

[Hervé]

Bonjour tout le monde

une autre syntaxe à la DidierMdf 😉

recup = 'Mercredi'
MsgBox Switch(recup = 'Lundi', 1, _
                            recup = 'Mardi', 2, _
                            recup = 'Mercredi', 3, _
                            recup = 'Jeudi', 4, _
                            recup = 'Vendredi', 5, _
                            recup = 'Samedi', 6, _
                            recup = 'Dimanche', 7)

salut

 

[AV]

Re,

Il me semble que pour être cohérent avec la question (à partir d'un chiffre renvoyer le jour de la semaine) la fonction vba devrait avoir plutôt cette allure :

Function TextuelJour(numjour%)
TextuelJour = WeekdayName(numjour)
End Function

Un bémol : La portabilité avec des version XL autres que françaises peut réserver des surprises !

AV [MVP Excel]

 

[AV]

Pfffff....

Oublions... je lis la question dans l'autre sens !
RePfff..Faites ce que je dis et non ce que je fais !

AV

 

[ninou58]

bonjour Av,
Bonjour tout le monde

Et bahje vois que tu continue à chercher 😉 .
C'est bon tout fonctionne. Et j'avais bien utiliser weekday mais dans un autre module 🙂 .

Encore merci, je peux maintenant récupérer dans les 2 sens
Sur ce bonne journée 🙂