新人求教VBA问题

=text(A1,"emmdd")
VBA可以用format函数一个道理。

在工作表标签处右键 ，点查看代码，复制下面的代码进去。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count > 1 Then End
If IsDate(Target) Then
Target = Format(Target, "yyyymmdd")
Target.NumberFormatLocal = "G/通用格式"
End If
End Sub
然后你在工作表中，想让哪个日期改就点那个。一个一个点，多了无效。