怎样设计Excel表格里面输入出生年月日，显示出来的是年龄啊？

2025-04-18 19:41:28

推荐回答（1个）

回答1：

打开Excel工作表，在工作表标签上点击鼠标右键，选择“查看代码”，或者按Alt+F11，双击对应的工作表名称，然后输入如下代码：Private
Sub
Worksheet_SelectionChange(ByVal
Target
As
Range)
If
Target.Address
=
"$A$1"
Then
If
InStr(Target,
"-")
>
0
Or
InStr(Target,
"/")
>
0
Then
Target.NumberFormatLocal
=
"G/通用格式"End
IfEnd
IfEnd
Sub输入完毕后，在A1单元格输入完出生年月日后，再次单击A1单元格，显示出来的就是年龄了。假如不能运行，请将宏安全性设为中，打开工作簿时启用宏即可。