Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Janvier ou january

Janvier ou january

3 réponses
Avatar
christophe
le but de la manoeuvre est le suivant:

j'ai un userform a partir du quel en francais je choisi le mois l'année et
le nom de la personne pour qui je vais "consulter" "modifier" ou "imprimer"
sont pointage. Tout ceci fonctionne mais le pb que j'ai ai que excel me
génére les mois en anglais et il me faut donc pouvoir , si par exemple je
choisi Janvier 2002, récuperer a partir de son choix le mois en anglais afin
de pouvoir ouvrir le fichier excel correspondant mais celui ci et en mois
anglais , ex january_2002
De plus la valeur recupérer est avec majuscule Janvier et le fichier a
ouvrir et sans majuscule Janvier_2002 pour january_2002
"LSteph" a écrit :

> Bonjour,
> Si tu testes:
> '****
> Sub testMois()
> [a1] = Format(Now, "mmmm")
> [a2] = UCase(Format(Now, "mmmm"))
> End Sub
> '****
> renvoie la chaine du mois actuel dans a1 mais l'interprètation retournera
> le mois
> selon la langue de ton excel: janvier
> ou en majuscule:
> Ucase(Format(ladate))="JANVIER"
>
> Un Select case.avec 12 mois in English et in French devrait assurer une
> comparaison . Tout dépend de ce que tu entends par reconnaître(par rapport à
> quoi dans quoi).
>
> Est -ce que cela t'aide?
>
> 'lSteph
>
> "christophe" <gainsbarre57@hotmail.com(sansspam)> a écrit dans le message de
> news: 5A78253F-8AC6-406A-AACD-1A8BE44788F5@microsoft.com...
> > Bonjour,
> >
> > Je cherche un moyen en vba de reconnaitre indifférement les mois en
> > francais
> > ou en anglais: ex: besoin de reconnaitre Janvier ou January, mais aussi ne
> > pas tenir compte de la présence de masjuclue en debut de mois ou pas ex:
> > Janvier ou janvier
> >
> > merci pour vos réponse
>
>
>
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Modeste
Bonsor® Christophe,
peut etre une possibilité sur XP en utilisant les formats
personnalisés (Locale IDs) :

Sub Macro1()
Range("A1:A7") = Date
'-----------en français
[A1].NumberFormat = "[$-F800]dddd, mmmm dd, yyyy"
'-----------en anglais
[A2].NumberFormat = "[$-0809]dddd, mmmm dd, yyyy"
'-----------en german-swiss
[A3].NumberFormat = "[$-0807]dddd, mmmm dd, yyyy"
'-----------taiwan
[A4].NumberFormat = "[$-0404]dddd, mmmm dd, yyyy"
'-+---------Tchéque
[A5].NumberFormat = "[$-0405]dddd, mmmm dd, yyyy"
'-----------Koweit
[A6].NumberFormat = "[$-3401]dddd, mmmm dd, yyyy"
'-----------Colombie
[A7].NumberFormat = "[$-240a]dddd, mmmm dd, yyyy"
'voir le lien suivant :
'http://www.microsoft.com/globaldev/reference/winxp/xp-
lcid.mspx
End Sub
-----Message d'origine-----
le but de la manoeuvre est le suivant:

j'ai un userform a partir du quel en francais je choisi
le mois l'année et

le nom de la personne pour qui je
vais "consulter" "modifier" ou "imprimer"

sont pointage. Tout ceci fonctionne mais le pb que j'ai
ai que excel me

génére les mois en anglais et il me faut donc
pouvoir , si par exemple je

choisi Janvier 2002, récuperer a partir de son choix le
mois en anglais afin

de pouvoir ouvrir le fichier excel correspondant mais
celui ci et en mois

anglais , ex january_2002
De plus la valeur recupérer est avec majuscule Janvier
et le fichier a

ouvrir et sans majuscule Janvier_2002 pour january_2002

Bonjour,
Si tu testes:
'****
Sub testMois()
[a1] = Format(Now, "mmmm")
[a2] = UCase(Format(Now, "mmmm"))
End Sub
'****
renvoie la chaine du mois actuel dans a1 mais
l'interprètation retournera


le mois
selon la langue de ton excel: janvier
ou en majuscule:
Ucase(Format(ladate))="JANVIER"

Un Select case.avec 12 mois in English et in French
devrait assurer une


comparaison . Tout dépend de ce que tu entends par
reconnaître(par rapport Ã


quoi dans quoi).

Est -ce que cela t'aide?

'lSteph

"christophe" (sansspam)> a
écrit dans le message de


news: 5A78253F-8AC6-406A-AACD-



Bonjour,

Je cherche un moyen en vba de reconnaitre
indifférement les mois en



francais
ou en anglais: ex: besoin de reconnaitre Janvier ou
January, mais aussi ne



pas tenir compte de la présence de masjuclue en
debut de mois ou pas ex:



Janvier ou janvier

merci pour vos réponse






.





Avatar
AV
Ou est le code qui provoque ça ?

AV
Avatar
Gaenonius
Une solution possible en réponse à ton fil initial de 10:03.

--
Gaenonius

le but de la manoeuvre est le suivant:

j'ai un userform a partir du quel en francais je choisi le mois l'année et
le nom de la personne pour qui je vais "consulter" "modifier" ou "imprimer"
sont pointage. Tout ceci fonctionne mais le pb que j'ai ai que excel me
génére les mois en anglais et il me faut donc pouvoir , si par exemple je
choisi Janvier 2002, récuperer a partir de son choix le mois en anglais afin
de pouvoir ouvrir le fichier excel correspondant mais celui ci et en mois
anglais , ex january_2002
De plus la valeur recupérer est avec majuscule Janvier et le fichier a
ouvrir et sans majuscule Janvier_2002 pour january_2002


Bonjour,
Si tu testes:
'****
Sub testMois()
[a1] = Format(Now, "mmmm")
[a2] = UCase(Format(Now, "mmmm"))
End Sub
'****
renvoie la chaine du mois actuel dans a1 mais l'interprètation retournera
le mois
selon la langue de ton excel: janvier
ou en majuscule:
Ucase(Format(ladate))="JANVIER"

Un Select case.avec 12 mois in English et in French devrait assurer une
comparaison . Tout dépend de ce que tu entends par reconnaître(par rapport à
quoi dans quoi).

Est -ce que cela t'aide?

'lSteph

"christophe" (sansspam)> a écrit dans le message de
news:

Bonjour,

Je cherche un moyen en vba de reconnaitre indifférement les mois en
francais
ou en anglais: ex: besoin de reconnaitre Janvier ou January, mais aussi ne
pas tenir compte de la présence de masjuclue en debut de mois ou pas ex:
Janvier ou janvier

merci pour vos réponse