如何在Excel VBA,userform中修改date格式

我有一个UserForm自动填充给定的数据从表中,我无法获得date的格式更改。 我不知道我的代码出错了。

Set name_ = Display.Controls.Add("Forms.Label.1", "Test" & labelCounter, True) With name_ .Caption = Format(debt_name_cell, mmm - yy) .Left = 10 .Width = 50 .Top = 10 * labelCounter End With Set debt_name_cell = debt_name_cell.Offset(1, 0) 

结果总是:

看看微软的VBA参考是一个好主意:
格式函数(Visual Basic for Applications) 。

在那里我们可以看到Format函数的第二个参数必须是一个类似的string

 Format(debt_name_cell, "mmm - yy") 

如果您遵循VBA最佳实践,请在每个VBA模块的顶部使用Option Explicit ,您将在一秒之内识别出类似的问题!