Intégrer le "/" dans une suite de nombre
Résolu
Crealex1979
Messages postés
15
Statut
Membre
-
Crealex1979 Messages postés 15 Statut Membre -
Crealex1979 Messages postés 15 Statut Membre -
Bonjour,
Je cherche la méthodo pour pouvoir faire en sorte que les collègues saisissent une suite de chiffre pour une date et que les barres de "/" se mettent seules une fois la cellule validée. Je travaille sur Excel 2010.
D'avance merci pour vos réponses.
Bonne journée
Je cherche la méthodo pour pouvoir faire en sorte que les collègues saisissent une suite de chiffre pour une date et que les barres de "/" se mettent seules une fois la cellule validée. Je travaille sur Excel 2010.
D'avance merci pour vos réponses.
Bonne journée
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
- Intégrer une liste déroulante 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
