摘要:
'日期添加 Sub addDate(d) Dim rg As Range, dd As Date d = Split(d, "-")(0) d = Replace(d, ".", "/") dd = CDate(d) r = ActiveSheet.Range("a65536").End(xlUp).Row '[d2] = dd ... 阅读全文
posted @ 2016-09-29 19:13
lunawzh
阅读(1134)
评论(0)
推荐(0)
浙公网安备 33010602011771号