在Excel中具有日期格式的怪异错误

时间:2018-07-05 10:04:59

标签: excel vba

所以我有一个activeX组合框,以“ dd-mm-yyyy”格式显示日期。日期取自另一张纸上的某个范围。我有一个链接的单元格(比方说A1),其中显示了组合框的日期。

它在大多数日期都可以正常工作,但由于某些原因,例如在10-09-2018或11-03-2018,它将链接单元格中的格式更改为“ mm-dd-yyyy”。

是否混淆前两个值中的哪个是天和月?

编辑:我的范围中的所有单元格均为文本,链接的单元格为“日期”,但是更改链接的单元格或范围中的这些单元格均无效。

我的组合框的代码,E26是有问题的单元格,E29只是我向日期加上2年的单元格,它总是正确显示日期。

Private Sub ProdDateCombobox_Change()
Range("E26") = Format(Me.ProdDateCombobox.Value, "dd-mm-yyyy")
Range("E29") = DateAdd("yyyy", 2, Me.ProdDateCombobox.Value)
End Sub

1 个答案:

答案 0 :(得分:1)

我设法解决了!它有点“ hack”,但我只是替换了

Range("E26") = Format(Me.ProdDateCombobox.Value, "dd-mm-yyyy")

与此:

Range("E29") = DateAdd("yyyy", 0, Me.ProdDateCombobox.Value)

它很奇怪,我不知道为什么会起作用,但是能起作用。感谢您的帮助。