楊老師課堂之Excel VBA 程序開發第三講創建日報表

  課件下載 ：           

方式1：本節課件下載地址：鏈接: https://pan.baidu.com/s/1K51AlChFb-N-zsyCtcdm4A 密碼: xpwn

方式2：或點擊此處下載

效果圖

代碼示例：

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