OVH Cloud OVH Cloud

Format cellule

11 réponses
Avatar
Emcy
Salut,

j'ai mis le format du type "mardi 10 mai 2004" dans une cellule. je n'arrive
pas à avoir le bon format lorsque je fait la commande Range("A1") = date + 5
=> je suis obligé de double cliquer sur la cellule puis de la deselectionner
pour que le format se mette correctement

10 réponses

1 2
Avatar
isabelle
bonjour Emcy,

essaie comme ça,
Range("A1") = Format(date + 5, "dddd dd mmmm aaaa")

isabelle


Salut,

j'ai mis le format du type "mardi 10 mai 2004" dans une cellule. je n'arrive
pas à avoir le bon format lorsque je fait la commande Range("A1") = date + 5
=> je suis obligé de double cliquer sur la cellule puis de la deselectionner
pour que le format se mette correctement


Avatar
isabelle
oup's moitié français et anglais ça faire un erreur,
correction :
Range("A1") = Format(date + 5, "dddd dd mmmm yyyy")

isabelle


bonjour Emcy,

essaie comme ça,
Range("A1") = Format(date + 5, "dddd dd mmmm aaaa")

isabelle


Salut,

j'ai mis le format du type "mardi 10 mai 2004" dans une cellule. je n'arrive
pas à avoir le bon format lorsque je fait la commande Range("A1") = date + 5
=> je suis obligé de double cliquer sur la cellule puis de la deselectionner
pour que le format se mette correctement




Avatar
Emcy
Merci de ton aide, tu ne sais pas comment faire pour avoir la première
lettre du nom du jour et du moi en majuscule ?

"isabelle" a écrit dans le message de
news:
oup's moitié français et anglais ça faire un erreur,
correction :
Range("A1") = Format(date + 5, "dddd dd mmmm yyyy")

isabelle


bonjour Emcy,

essaie comme ça,
Range("A1") = Format(date + 5, "dddd dd mmmm aaaa")

isabelle


Salut,

j'ai mis le format du type "mardi 10 mai 2004" dans une cellule. je
n'arrive



pas à avoir le bon format lorsque je fait la commande Range("A1") date + 5
=> je suis obligé de double cliquer sur la cellule puis de la
deselectionner



pour que le format se mette correctement






Avatar
isabelle
bonjour Emcy,

pour la première lettre,

Range("A1") = Format(Date, "dddd dd mmmm yyyy")
Range("A1") = Evaluate("=UPPER(Left(A1, 1))") & Right(d,
Len(Range("A1")) - 1)

pour celle du mois, ça devient plus compliqué, c'est pas évident d'isolé
le mois pour mettre ca première lettre en majuscule, je vais pensé à une
solution, et te revient.

isabelle


Merci de ton aide, tu ne sais pas comment faire pour avoir la première
lettre du nom du jour et du moi en majuscule ?

"isabelle" a écrit dans le message de
news:
oup's moitié français et anglais ça faire un erreur,
correction :
Range("A1") = Format(date + 5, "dddd dd mmmm yyyy")

isabelle


bonjour Emcy,

essaie comme ça,
Range("A1") = Format(date + 5, "dddd dd mmmm aaaa")

isabelle


Salut,

j'ai mis le format du type "mardi 10 mai 2004" dans une cellule. je
n'arrive



pas à avoir le bon format lorsque je fait la commande Range("A1") > date + 5
=> je suis obligé de double cliquer sur la cellule puis de la
deselectionner



pour que le format se mette correctement








Avatar
isabelle
voilà, je n'ai pas trouvé plus court. mais attention ce n'est plus une
vrai date mais du texte.

[A1] = Format(Date, "dddd dd mmmm yyyy")
[A1] = Evaluate("=UPPER(Left(A1, 1))") & Right([A1], Len(Range("A1")) -
1)
mois = Format(Date, "mmmm")
m = Left(mois, 1) & Right(mois, Len(mois) - 1)
lm = Chr(Asc(m) - 32) & Right(mois, Len(mois) - 1)
[A1] = Replace([A1], m, lm)

isabelle


bonjour Emcy,

pour la première lettre,

Range("A1") = Format(Date, "dddd dd mmmm yyyy")
Range("A1") = Evaluate("=UPPER(Left(A1, 1))") & Right(d,
Len(Range("A1")) - 1)

pour celle du mois, ça devient plus compliqué, c'est pas évident d'isolé
le mois pour mettre ca première lettre en majuscule, je vais pensé à une
solution, et te revient.

isabelle


Merci de ton aide, tu ne sais pas comment faire pour avoir la première
lettre du nom du jour et du moi en majuscule ?

"isabelle" a écrit dans le message de
news:
oup's moitié français et anglais ça faire un erreur,
correction :
Range("A1") = Format(date + 5, "dddd dd mmmm yyyy")

isabelle


bonjour Emcy,

essaie comme ça,
Range("A1") = Format(date + 5, "dddd dd mmmm aaaa")

isabelle


Salut,

j'ai mis le format du type "mardi 10 mai 2004" dans une cellule. je
n'arrive



pas à avoir le bon format lorsque je fait la commande Range("A1") > > date + 5
=> je suis obligé de double cliquer sur la cellule puis de la
deselectionner



pour que le format se mette correctement










Avatar
Emcy
Merci beaucoup !!!!!


"isabelle" a écrit dans le message de
news:
voilà, je n'ai pas trouvé plus court. mais attention ce n'est plus une
vrai date mais du texte.

[A1] = Format(Date, "dddd dd mmmm yyyy")
[A1] = Evaluate("=UPPER(Left(A1, 1))") & Right([A1], Len(Range("A1")) -
1)
mois = Format(Date, "mmmm")
m = Left(mois, 1) & Right(mois, Len(mois) - 1)
lm = Chr(Asc(m) - 32) & Right(mois, Len(mois) - 1)
[A1] = Replace([A1], m, lm)

isabelle


bonjour Emcy,

pour la première lettre,

Range("A1") = Format(Date, "dddd dd mmmm yyyy")
Range("A1") = Evaluate("=UPPER(Left(A1, 1))") & Right(d,
Len(Range("A1")) - 1)

pour celle du mois, ça devient plus compliqué, c'est pas évident d'isolé
le mois pour mettre ca première lettre en majuscule, je vais pensé à une
solution, et te revient.

isabelle


Merci de ton aide, tu ne sais pas comment faire pour avoir la première
lettre du nom du jour et du moi en majuscule ?

"isabelle" a écrit dans le message de
news:
oup's moitié français et anglais ça faire un erreur,
correction :
Range("A1") = Format(date + 5, "dddd dd mmmm yyyy")

isabelle


bonjour Emcy,

essaie comme ça,
Range("A1") = Format(date + 5, "dddd dd mmmm aaaa")

isabelle


Salut,

j'ai mis le format du type "mardi 10 mai 2004" dans une cellule.
je






n'arrive
pas à avoir le bon format lorsque je fait la commande
Range("A1") > > > date + 5






=> je suis obligé de double cliquer sur la cellule puis de la
deselectionner



pour que le format se mette correctement












Avatar
modeste
;-)))
et ça, cela n'irait-il pas mieux :
[A1] = Application.Proper(Format(Now + 5, "dddd dd mmmm
yyyy"))


@+
;-X

-----Message d'origine-----
Merci de ton aide, tu ne sais pas comment faire pour
avoir la première


lettre du nom du jour et du moi en majuscule ?




Avatar
isabelle
:-))))) bon sens, mais oui. je suis cassé la tête pour rien, en tout cas
ça fait plus propre.
bisou
isabelle


;-)))
et ça, cela n'irait-il pas mieux :
[A1] = Application.Proper(Format(Now + 5, "dddd dd mmmm
yyyy"))

@+
;-X

-----Message d'origine-----
Merci de ton aide, tu ne sais pas comment faire pour
avoir la première


lettre du nom du jour et du moi en majuscule ?






Avatar
Emcy
C'est vrai, c'est plus propre => mais pourquoi cette fonction
n'apparait-elle pas dans l'explorateur d'objet ?

"isabelle" a écrit dans le message de
news:
:-))))) bon sens, mais oui. je suis cassé la tête pour rien, en tout cas
ça fait plus propre.
bisou
isabelle


;-)))
et ça, cela n'irait-il pas mieux :
[A1] = Application.Proper(Format(Now + 5, "dddd dd mmmm
yyyy"))

@+
;-X

-----Message d'origine-----
Merci de ton aide, tu ne sais pas comment faire pour
avoir la première


lettre du nom du jour et du moi en majuscule ?








Avatar
isabelle
si si elle y est c'est en francais sous : NOMPROPRE
Met en majuscule la première lettre de chaque chaîne de caractères et
toute lettre d'un texte qui suit un caractère non alphabétique. Toutes
les autres lettres sont converties en lettres minuscules.

isabelle



C'est vrai, c'est plus propre => mais pourquoi cette fonction
n'apparait-elle pas dans l'explorateur d'objet ?

"isabelle" a écrit dans le message de
news:
:-))))) bon sens, mais oui. je suis cassé la tête pour rien, en tout cas
ça fait plus propre.
bisou
isabelle


;-)))
et ça, cela n'irait-il pas mieux :
[A1] = Application.Proper(Format(Now + 5, "dddd dd mmmm
yyyy"))

@+
;-X

-----Message d'origine-----
Merci de ton aide, tu ne sais pas comment faire pour
avoir la première


lettre du nom du jour et du moi en majuscule ?










1 2