1 votes

La fonction vba Format d'Excel2016 sous Windows 10 produit un séparateur de temps inattendu

Le code ci-dessous donnait le séparateur de temps demandé, mais maintenant Excel2016 sur Windows 10 produit un résultat erroné.

Public Sub TestDateFormat()
    Dim s As String
    Dim d As Date

    d = Now()
    s = Format(d, "yyyy.mm.dd Hh:Nn:Ss")
    Debug.Print s
End Sub

\============================================

TestDateFormat

2018.11.08 13.43.26

Windows 10 Pro version 10.0.17134 Excel pour Office version 16.0.11001.20074

Quelqu'un d'autre a ça ?

0voto

HWa Points 11

Problème dans la fonction vba. Le format semble utiliser le délimiteur spécial donné pour la date, mais le délimiteur des paramètres régionaux pour l'heure ! OMG !

0voto

harrymc Points 394411

Utilisez une cellule de date pour enregistrer la date dans le format que vous souhaitez :

cell.NumberFormat = "yyyy.mm.dd hh:mm:ss"

0voto

HWa Points 11

StrReverse(Replace(StrReverse(Format(d, "yyyy.mm.dd Hh:Nn:Ss")), ".", " :", 1, 2)))

SistemesEz.com

SystemesEZ est une communauté de sysadmins où vous pouvez résoudre vos problèmes et vos doutes. Vous pouvez consulter les questions des autres sysadmins, poser vos propres questions ou résoudre celles des autres.

Powered by:

X