杨老师课堂之Excel VBA 程序开发第三讲创建日报表

  课件下载 ：           

方式1：本节课件下载地址：链接: https://pan.baidu.com/s/1K51AlChFb-N-zsyCtcdm4A 密码: xpwn

方式2：或点击此处下载

效果图

代码示例：

代码语言：javascript复制

Sub 日报()

    For i = 1 To 30
        Sheet1.Copy after:=Sheets(Sheets.Count)
        Sheets(Sheets.Count).Name = "5月" & i & "日"
        Sheets(Sheets.Count).Range("e5") = "2018-05-" & i
    Next
End Sub

vba http

0 人点赞