主题：如何将表日期一列设置成 MM-DD格式

老师，请教：

表里面的  日期 列，输入的是正常  XXXX年-XX月-XX日，且可以使用内置输入器（日历输入），但我想输入完成后，

显示成为  MM-DD格式，如2020-01-28 ，输入后显示成为 01-28  (2020年省略） 以节约单元格空间，如何设置，请教！

顺祝老师新快乐！

不行啊，老师。，你再帮我看看!  见附图。

以下代码没有错的，显示的就是MM-DD,而且我已经添加到了表属性

AFTEREDIT事件里面，但测试就是没有变过来呀，什么情况这是：

Dim r As Row = Tables("记价表").Current

Dim DD As Date = R("日期")

Format(dd, "MM-dd")