1 - Est-il possible d'obtenir (JANVIER 2004) avec le menu=20
personnalis=E9 sans formule ?
2 - Si oui, connaissez-vous un endroit o=F9 je puisse=20
trouver=20
des exemples de formats personnalis=E9s ?
Merci pour ta réponse mais c'est en majuscule que je le veux
-----Message d'origine----- Est-il possible d'obtenir (JANVIER 2004) avec le menu personnalisé sans formule ?
mmmm aaaa devrait convenir.
Serge
.
gee-dee-
Aide-toi le ciel t'aidera !!!!
le travail tout maché ne tombe pas du ciel !!!!
il existe une aide dans excel qui donne l'explication des formules utilisées dans Excel en l'occurrence : la fonction TEXTE (voir les parametres et la syntaxe) puis la fonction MAJUSCULE
@+
Aide-toi le ciel t'aidera !!!!
le travail tout maché ne tombe pas du ciel !!!!
il existe une aide dans excel qui donne l'explication des formules
utilisées dans Excel
en l'occurrence :
la fonction TEXTE (voir les parametres et la syntaxe)
puis la fonction MAJUSCULE
il existe une aide dans excel qui donne l'explication des formules utilisées dans Excel en l'occurrence : la fonction TEXTE (voir les parametres et la syntaxe) puis la fonction MAJUSCULE
@+
Jacky
Oui, mais, Le rital dit : "avec le menu personnalisé sans formule " Alors même le ciel ne l'aidera pas....
JJ
"gee-dee-" a écrit dans le message news:
Aide-toi le ciel t'aidera !!!!
le travail tout maché ne tombe pas du ciel !!!!
il existe une aide dans excel qui donne l'explication des formules utilisées dans Excel en l'occurrence : la fonction TEXTE (voir les parametres et la syntaxe) puis la fonction MAJUSCULE
@+
Oui, mais, Le rital dit : "avec le menu personnalisé sans formule "
Alors même le ciel ne l'aidera pas....
JJ
"gee-dee-" <nomail@nomail.com> a écrit dans le message news:
em32IGpwDHA.1740@TK2MSFTNGP12.phx.gbl...
Aide-toi le ciel t'aidera !!!!
le travail tout maché ne tombe pas du ciel !!!!
il existe une aide dans excel qui donne l'explication des formules
utilisées dans Excel
en l'occurrence :
la fonction TEXTE (voir les parametres et la syntaxe)
puis la fonction MAJUSCULE
Oui, mais, Le rital dit : "avec le menu personnalisé sans formule " Alors même le ciel ne l'aidera pas....
JJ
"gee-dee-" a écrit dans le message news:
Aide-toi le ciel t'aidera !!!!
le travail tout maché ne tombe pas du ciel !!!!
il existe une aide dans excel qui donne l'explication des formules utilisées dans Excel en l'occurrence : la fonction TEXTE (voir les parametres et la syntaxe) puis la fonction MAJUSCULE
@+
AV
Merci pour ta réponse mais c'est en majuscule que je le veux
Ben si pas de formule comme ça alors :-) Dans le module dela feuille :
Private Sub Worksheet_Change(ByVal zz As Range) If IsDate(zz) Then Application.EnableEvents = False zz = UCase(Format(zz, "mmmm yyyy")) Application.EnableEvents = True End If End Sub
AV
Merci pour ta réponse mais c'est en majuscule que je le
veux
Ben si pas de formule comme ça alors :-)
Dans le module dela feuille :
Private Sub Worksheet_Change(ByVal zz As Range)
If IsDate(zz) Then
Application.EnableEvents = False
zz = UCase(Format(zz, "mmmm yyyy"))
Application.EnableEvents = True
End If
End Sub
Merci pour ta réponse mais c'est en majuscule que je le veux
Ben si pas de formule comme ça alors :-) Dans le module dela feuille :
Private Sub Worksheet_Change(ByVal zz As Range) If IsDate(zz) Then Application.EnableEvents = False zz = UCase(Format(zz, "mmmm yyyy")) Application.EnableEvents = True End If End Sub
AV
Bonjour le forum, Merci pour les réponses La solution de AV est parfaite Cordialement
Le rital
-----Message d'origine-----
Merci pour ta réponse mais c'est en majuscule que je le veux
Ben si pas de formule comme ça alors :-) Dans le module dela feuille :
Private Sub Worksheet_Change(ByVal zz As Range) If IsDate(zz) Then Application.EnableEvents = False zz = UCase(Format(zz, "mmmm yyyy")) Application.EnableEvents = True End If End Sub
AV
.
Bonjour le forum,
Merci pour les réponses
La solution de AV est parfaite
Cordialement
Le rital
-----Message d'origine-----
Merci pour ta réponse mais c'est en majuscule que je le
veux
Ben si pas de formule comme ça alors :-)
Dans le module dela feuille :
Private Sub Worksheet_Change(ByVal zz As Range)
If IsDate(zz) Then
Application.EnableEvents = False
zz = UCase(Format(zz, "mmmm yyyy"))
Application.EnableEvents = True
End If
End Sub
Bonjour le forum, Merci pour les réponses La solution de AV est parfaite Cordialement
Le rital
-----Message d'origine-----
Merci pour ta réponse mais c'est en majuscule que je le veux
Ben si pas de formule comme ça alors :-) Dans le module dela feuille :
Private Sub Worksheet_Change(ByVal zz As Range) If IsDate(zz) Then Application.EnableEvents = False zz = UCase(Format(zz, "mmmm yyyy")) Application.EnableEvents = True End If End Sub
