Microsoft 365 Convertir un nombre au format date courte

  • Initiateur de la discussion Initiateur de la discussion pat66
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

pat66

XLDnaute Impliqué
Bonsoir le forum,

est il possible de saisir dans une cellule, par exemple 15061980 et faire en sorte qu'en cliquant sur entrée, cela devienne 15/06/1980 automatiquement

un grand merci

bonne soirée
 
Solution
Oui je crois qu'il vaut mieux ça en fin de compte :
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
   Dim V As Variant, S As String
   If Target.CountLarge > 1 Then Exit Sub
   V = Target.Value2
   If VarType(V) <> vbDouble Then Exit Sub
   If V < 1011900 Then Exit Sub
   Application.EnableEvents = False
   Target.Value = DateSerial(Int(V) Mod 10000, Int(V / 10000) Mod 100, Int(V / 1000000))
   Application.EnableEvents = True
   End Sub
Mais je préconiserais plutôt l'utilisation du calendrier …
On notera que ma solution du post #11 colle parfaitement avec le calendrier grégorien :

- les dates du 05/10/1582 au 14/10/1582 n'existent pas

😉😎🙂
ça c'est pour la bulle pontificale Grégoire XIII
en France application pour la période dimanche 9 décembre 1582(JD 2299225) au lundi 20 décembre 1582 (JD 2299226)'
disparition de 11 jours induit par le calendrier Julien, correspondants au décalage solaire (équinoxes et solstices), le lundi suivant cependant naturellement le dimanche
365,25 jours par an, correction quadri-séculaire grégorienne 365,2425 jours par an

- les 29/02/1600 et 29/02/2000 existent mais les 29/02/1700 29/02/1800 29/02/1900 n'existent pas.

Bien sûr puisqu'il faut 8 chiffres les années antérieures au 01/01/1000 n'existent pas.
la notation grégorienne n'a pas de sens avant 1582
l'adoption de la notation du calendrier grégorien s'est étalé sur plus de 300 ans !!
dans ce cas il faut préciser le pays et la date julienne, J M A
a ne pas confondre avec le jour julien : JD 2299225
les formats de dateserial VBA sont en partie erronés
il faut recalculer les jours, mois, années à partir des jours julien !!!😡☹️
je m'y était attelé, mais difficile de faire la corrélation avec les traces historiques (Pompéï, Alésia, sacre de Charlemagne etc...)
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
6
Affichages
402
Réponses
10
Affichages
348
Réponses
12
Affichages
336
Réponses
10
Affichages
529
Retour