transformer date en chiffre

Tibo

XLDnaute Barbatruc

• 30 Août 2011

• #2

Re : transformer date en chiffre

Bonsoir,

Pour le mois en chiffre, la fonction MOIS suffit.

Pour l'année en toutes lettres, cette formule :

Code:

=CHOISIR(ENT(A1/1000);"";"deux ")&"mille "&SI(MOD(A1;1000)>99;CHOISIR(MOD(A1;1000)/100;;"deux ";"trois ";"quatre ";"cinq ";"six ";"sept ";"huit ";"neuf ")&"cent"&SI(MOD(A1;1000)>100;SI(MOD(MOD(A1;1000);100)=0;"s";" "););)&CHOISIR(MOD(MOD(A1;1000)/10;10)+1;;;"vingt";"trente";"quarante";"cinquante";"soixante";"soixante";"quatre-vingt"&SI(MOD(MOD(A1;1000);10)=0;"s";);"quatre-vingt")&SI(MOD(MOD(A1;1000);100)<20;;SI(ET(OU(MOD(MOD(A1;1000);10)<>0;MOD(MOD(A1;1000);100)=70;MOD(MOD(A1;1000);100)=90));SI(ET(MOD(MOD(A1;1000);10)=1;MOD(MOD(A1;1000);100)<80);" et ";"-");))&CHOISIR(MOD(MOD(A1;1000);100)-CHOISIR(MOD(MOD(A1;1000)/10;10)+1;;;2;3;4;5;6;6;8;8)*10+1;;"un";"deux";"trois";"quatre";"cinq";"six";"sept";"huit";"neuf";"dix";"onze";"douze";"treize";"quatorze";"quinze";"seize";"dix-sept";"dix-huit";"dix-neuf")

Je te laisse tester

La formule ne fonctionne pas pour les dates antérieures à l'an 1000 (Excel ne sait pas gérer de toute façon), ni pour les dates supérieures au 31 décembre 2999 (là, pas difficile d'adapter si nécessaire 🙂)

@+

Edit : tout ça pour rien, j'avais mal lu. Pour l'année en chiffre : la fonction ANNEE

@+

 

Vote positif 0 Vote négatif

B

Bruce68

XLDnaute Impliqué

• 30 Août 2011

• #3

Re : transformer date en chiffre

Bonsoir

Un fichier en exemple

 

Pièces jointes

• test.xls

  78 KB · Affichages: 83
• test.xls

  78 KB · Affichages: 84
• test.xls

  78 KB · Affichages: 83

Vote positif 0 Vote négatif

ralph45

XLDnaute Impliqué

• 31 Août 2011

• #4

Re : transformer date en chiffre

Bonjour le fil,

Autre solution pour l'année : en A3 =(A1), puis
Format/
Cellule/
Nombre/
Personnalisée/

Type, saisir aaaa

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 31 Août 2011

• #5

Re : transformer date en chiffre

Bonjour,

Puisqu'on en est là...

Pour faire ça mieux vaut du VBA 😛

Code:

Function VBMOIS(dat)
dat = CDate(dat)
VBMOIS = Month(dat)
End Function

Function VBANNEE(dat)
dat = CDate(dat)
VBANNEE = Year(dat)
End Function

A+

 

Pièces jointes

• Dates(1).xls

  36.5 KB · Affichages: 65
• Dates(1).xls

  36.5 KB · Affichages: 75
• Dates(1).xls

  36.5 KB · Affichages: 71

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 31 Août 2011

• #6

Re : transformer date en chiffre

Re,

Une ressucée, mais ça devient du vice :

Code:

Function VBMOIS(dat)
VBMOIS = ""
On Error Resume Next
VBMOIS = Month(CDate(CStr(dat)))
End Function

Function VBANNEE(dat)
VBANNEE = ""
On Error Resume Next
VBANNEE = Year(CDate(CStr(dat)))
End Function

A+

 

Pièces jointes

• Dates(2).xls

  37.5 KB · Affichages: 68
• Dates(2).xls

  37.5 KB · Affichages: 78
• Dates(2).xls

  37.5 KB · Affichages: 59

Vote positif 0 Vote négatif

Verba_Tim

XLDnaute Occasionnel

• 31 Août 2011

• #7

Re : transformer date en chiffre

Salut tout le monde ^^

Il y a aussi la possibilité d'utilisé les fonctions droite/gauche qui permettent de prendre que certains caractères en bout de chaine (pour aller chercher l'année 🙂 )

A +

VB_T

 

Vote positif 0 Vote négatif

M

mikeo

XLDnaute Occasionnel

• 31 Août 2011

• #8

Re : transformer date en chiffre

Bonjour à tous,

Ceci juste pour dire bonjour à tout le monde, surtout à Job et Tibo qui se sont précipités pour répondre (je plaisante). Mais si j'ai bien compris la question et le titre, wrap food demandait une date en "chiffre" et non pas en "lettres". Ceci dit, vous avez fait un sacré boulot.

mIKEO

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 31 Août 2011

• #9

Re : transformer date en chiffre

Bonjour Verba_Tim, mikeo,

Verba_Tim à dit:

Il y a aussi la possibilité d'utilisé les fonctions droite/gauche qui permettent de prendre que certains caractères en bout de chaine (pour aller chercher l'année 🙂 )

Cliquez pour agrandir...

Oui, mais ce n'est pas forcément simple, essayez avec le fichier joint.

A+

 

Pièces jointes

• Dates(3).xls

  33.5 KB · Affichages: 67
• Dates(3).xls

  33.5 KB · Affichages: 71
• Dates(3).xls

  33.5 KB · Affichages: 75

Dernière édition: 31 Août 2011

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 31 Août 2011

• #10

Re : transformer date en chiffre

Bonjour

Euh je ne peut-être pas tout compris mais
en A2 =MOIS(A1)
en A3 =ANNEE(A1)

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 31 Août 2011

• #11

Re : transformer date en chiffre

Bonjour Pascal 🙂

PascalXLD à dit:

Euh je ne peut-être pas tout compris

Cliquez pour agrandir...

Tu as surtout lu en diagonale, voir le post #2 de Tibo et son Edit.

A+

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 31 Août 2011

• #12

Re : transformer date en chiffre

Re

job75 à dit:

Bonjour Pascal 🙂



Tu as surtout lu en diagonale, voir le post #2 de Tibo et son Edit.

A+

Cliquez pour agrandir...

Arf avec tous ces codes à droite à gauche j'avais mal lu la réponse de Tibo

 

Vote positif 0 Vote négatif

W

wrap food

XLDnaute Occasionnel

• 31 Août 2011

• #13

Re : transformer date en chiffre

Merci pour toute ces explications .

Mais en faite j 'aimerais que dans la premiere cellule je saisise 01/02/2011 et que dans une cellule il et le chiffre 2 et non pas une formule qui soit inscrite.

je vous mais un fichier pour exemple
Si l 'un d 'entre vous a la solution ..

par avance

Merci

 

Pièces jointes

• Classeur1.xls

  64 KB · Affichages: 81
• Classeur1.xls

  64 KB · Affichages: 66
• Classeur1.xls

  64 KB · Affichages: 79

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 31 Août 2011

• #14

Re : transformer date en chiffre

Re,

Vous me parassez un adepte des coups fourrés wrap food.

Dans votre fichier joint la cellule C1 est calculée à partir de A1 et A2 qui sont renseignées manuellement.

A+

 

Vote positif 0 Vote négatif

W

wrap food

XLDnaute Occasionnel

• 1 Septembre 2011

• #15

Re : transformer date en chiffre

Re,

Désolé c'est pas un coups fourrés, mais en faite le planning qui est a droite de cellule ce calcule avec les informations qui sont incrites manuellement dans les cellules .

Le but de ma question de départ etait de savoir si il y avait un moyen autre de mettre le chiffre du mois et de l 'année depuis une cellule au l 'oppérateur aurai saisie la date au forma 01/01/2011 ( par exemnle )

je ne trouve pas ....

ou dois je prendre le probléme dans l' autre sens et de trouver une solution pour que l 'oppérateur rentre dans dans une cellule le mois (7) et dans une autres cellule l'année (2011) et en suite concamenter les deux cellules pour que cela corresponde a la date du 01/07/2011


par avance

merci

 

Vote positif 0 Vote négatif