creer une cellule du type _/_/_

[walker59]

Bonjour à tous voila j'ai un planning crée sur excel 2010 qui fonctionne assez bien mais voila j'ai crée un tableau dans lequel si un individu voulait connaitre sa position de travail dans l'année en cours il lui suffisait de rentrer une date et sa position s'affichait et pour des raisons ésthétiques je voulais une cellule qui puisse afficher un format _/_/_ afin d'être plus visible merci

 

[job75]

Re : creer une cellule du type _/_/_

Bonjour walker59,

Si c'est juste une cellule qui est concernée :

Private Sub Worksheet_Change(ByVal Target As Range)
If [A1].Text = "" Then [A1] = "_/_/_" 'cellule à adapter
End Sub

Si c'est toute une plage :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range
For Each c In [A1:A10] 'plage à adapter
  If c.Text = "" Then c = "_/_/_"
Next
End Sub

A+

 

[walker59]

Re : creer une cellule du type _/_/_

Merci job75 je viens d'essayer en mettant le code dans un module mais cela ne marche pas pourrais tu me dire si je dois le mettre dans une feuille spécifique merci d'avance

 

[walker59]

Re : creer une cellule du type _/_/_

Excuse job75 j'ai trouvé la solution il fallait le mettre dans la feuille concerné merci à toi JOB75