[Excel] Format date changeant macro/normal Résolu/Fermé

Question

Bonjours,
Je veux définier la valeur d'une cellule entre 2 date, 01/2008 et 12/2099. Je réussi trés bien en passant par les menus excel à la souris. Cela me donne un résultat visible :
déc-08

Or dés que je veux le passer en macro, il ne prends plus ce format de date mais le format basique xx/xx/xxxx..

Je ne vois pas quel champ modifier pour changer ce format. Le macro automatique d'excel m'a donné les codes suivant : 

Range("E14").Select
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateDate, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="1/1/2008", Formula2:="31/12/2099"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
end with

une idée pour garder le premier format (mois-année) sous macro ?!

merci.

deniooo · Answer

Function Datte(ByVal cel As Range)

    cel.Select
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateDate, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="1/1/2005", Formula2:="12/31/2099"
    End With
    Selection.NumberFormat = "mmm-yyyy"
End Function

(encore du code si quelqu'un a le même probléme)

Probléme résolu !

[Excel] Format date changeant macro/normal

1 réponse

Discussions similaires