© 1999-2048 dssz.net 粤ICP备11031372号
[电子政务] 信息科科室安全检查记录表(vba插入工作日记录)
说明:代码很简单,需要启用宏,具体代码如下: Sub Workbook_Open() Range("A3:F25").ClearContents a = 3 monthDays = Day(DateSerial(Year(Date), Month(Date) + 1, 0)) For i = 1 To monthDays date1 = Year(Now()) & "-" & Month(Now()) & "-" & i If workD<lilin3247> 在 上传 | 大小:52224