Date au mois et à l'année actuelle

dealise

XLDnaute Junior
Bonjour,

Je suis à la recherche de la syntaxe à écrire dans "format de cellule" afin que j'obtienne la date au format : jj/mm/yy
Jusque là pas de problème j'y arrive le truc, c'est que je voudrais que si l'utilisateur rentre : 02 dans la cellule, le mois et l'année soit ceux du mois et de l'année actuelle
Par exemple si je met "02" que j'obtienne : 02/03/12, car actuellement j'obtient 02/01/00...

Merci par avance pour vos réponses !
 

Softmama

XLDnaute Accro
Re : Date au mois et à l'année actuelle

bonjour dealise,

une petite macro permet de le faire (placée dans le module de ta feuille de calcul):
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub

'Adapter ci dessous l'adresse de la cellule qui doit réagir.
' Pour une colonne entière mettre (col A par exemple) :
' If Target.column = 1 then
If Target.Address(0, 0) = "A1" And Target > 0 And Target < 32 Then
  Target = DateSerial(Year(Now), Month(Now), Target)
End If

End Sub

un exemple en fichier joint.
 

Pièces jointes

  • dealise.xls
    32.5 KB · Affichages: 67
  • dealise.xls
    32.5 KB · Affichages: 57
  • dealise.xls
    32.5 KB · Affichages: 55

pierrejean

XLDnaute Barbatruc
Re : Date au mois et à l'année actuelle

Bonjour dealise

Vois si cela te convient

Edit : Salut Softmama
 

Pièces jointes

  • dealise.xls
    37.5 KB · Affichages: 50
  • dealise.xls
    37.5 KB · Affichages: 63
  • dealise.xls
    37.5 KB · Affichages: 51
Dernière édition:

Discussions similaires

Réponses
2
Affichages
285

Membres actuellement en ligne

Statistiques des forums

Discussions
312 726
Messages
2 091 389
Membres
104 906
dernier inscrit
biancostefano