Bonjour à tous,
J'ai un classeur Excel représentant un fichier type à compléter, notamment avec des dates d'évènements. J'ai écrit une MACRO pour que lorsque je clique sur les cases à remplir par une date, un calendrier apparaisse, et que l'on puisse choisir la date voulue (la date s'affiche correctement au format jj/mm/aaaa).
Le problème est que j'aimerais enregistrer une copie de ce fichier original (une fois complété) via une MACRO, et sous un nom comprenant la date au format aaaa/mm/jj (pour des raisons de classification).
Or, malgré plusieurs essais je n'arrive pas à obtenir ce format là !!
Voici un peu de mon code
If Range("L9").Value <> "" Then
Dim Date_AJA As String
Date_AJA = Range("L9").Value
Sheets("Données").Select
Range("B22:C22").Value = Date_AJA
Range("C22").NumberFormat = "yyyy/mm/dd"
Date_AJA = Range("C22").Value
Range("B22:C22").Select
Selection.Delete
Sheets("Formulaire").Select
End If
MsgBox Date_AJA
[...]
La Msgbox m'affiche tout le temps la date au format jj/mm/aaaa, malgré que ma cellule C22 affiche le bon format aaaa/mm/jj !!!
Merci d'avance pour votre aide !
J'ai un classeur Excel représentant un fichier type à compléter, notamment avec des dates d'évènements. J'ai écrit une MACRO pour que lorsque je clique sur les cases à remplir par une date, un calendrier apparaisse, et que l'on puisse choisir la date voulue (la date s'affiche correctement au format jj/mm/aaaa).
Le problème est que j'aimerais enregistrer une copie de ce fichier original (une fois complété) via une MACRO, et sous un nom comprenant la date au format aaaa/mm/jj (pour des raisons de classification).
Or, malgré plusieurs essais je n'arrive pas à obtenir ce format là !!
Voici un peu de mon code
If Range("L9").Value <> "" Then
Dim Date_AJA As String
Date_AJA = Range("L9").Value
Sheets("Données").Select
Range("B22:C22").Value = Date_AJA
Range("C22").NumberFormat = "yyyy/mm/dd"
Date_AJA = Range("C22").Value
Range("B22:C22").Select
Selection.Delete
Sheets("Formulaire").Select
End If
MsgBox Date_AJA
[...]
La Msgbox m'affiche tout le temps la date au format jj/mm/aaaa, malgré que ma cellule C22 affiche le bon format aaaa/mm/jj !!!
Merci d'avance pour votre aide !