Intégrer le "/" dans une suite de nombre
Résolu
Crealex1979
Messages postés
15
Date d'inscription
Statut
Membre
Dernière intervention
-
Crealex1979 Messages postés 15 Date d'inscription Statut Membre Dernière intervention -
Crealex1979 Messages postés 15 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Intégrer le "/" dans une suite de nombre
- Intégrer une vidéo dans un powerpoint - Guide
- Nombre de jours entre deux dates excel - Guide
- Nombre facile - Télécharger - Outils professionnels
- Ascii nombre de caractères - Guide
- Afficher le 0 devant un nombre dans excel - Guide
2 réponses
Bonjour,
En vba Faire Alt F11 pour accéder à l'éditeur.
Cliquez sur la feuille qui contient les données en haut à gauche.
Mettre ce code :
Allez sur la feuille, changer de feuille, revenez , c'est opérationnel
Il suffit d'enregistrer sous Classeur prenant en charge les macros
En vba Faire Alt F11 pour accéder à l'éditeur.
Cliquez sur la feuille qui contient les données en haut à gauche.
Mettre ce code :
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
'---Convertit un nombre de 7 ou 8 chiffres en date---
Dim d As Variant
d = Target.Value 'l'idéal serait de connaître la frappe exacte...
If Not (d Like "#######" Or d Like "########") Then Exit Sub
d = Left(Right(d, 6), 2) & "/" & Left(Right(0 & d, 8), 2) & "/" & Right(d, 4) 'mm/dd/yyyy
d = ExecuteExcel4Macro("DATEVALUE(""" & d & """)")
If IsNumeric(d) Then
Target.NumberFormat = "dd/mm/yyyy"
Target = d
Else
Target.NumberFormat = "General"
End If
End Sub
Allez sur la feuille, changer de feuille, revenez , c'est opérationnel
Il suffit d'enregistrer sous Classeur prenant en charge les macros
