工作中常遇到报表日期录入不规范（20170512），但是这样的格式电脑是不支持的，每次手动录入公式又费时间，所有在网上找到EXCEL利用宏制作自定义公式的方法。

1、首先在VB界面插入模块

2、输入公式内容

Function changeriqi(a)
    changeriqi = Left(a, 4) & "-" & Mid(a, 5, 2) & "-" & Right(a, 2)
End Function