版權聲明:本文為部落客原創文章,未經部落客允許不得轉載。 https://blog.csdn.net/kese7952/article/details/80280932
課件下載下傳 :
方式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
作者: 楊校
出處:
https://blog.csdn.net/kese7952分享是快樂的,也見證了個人成長曆程,文章大多都是工作經驗總結以及平時學習積累,基于自身認知不足之處在所難免,也請大家指正,共同進步。
本文版權歸作者所有,歡迎轉載,但未經作者同意必須保留此段聲明,且在文章頁面明顯位置給出, 如有問題, 可郵件([email protected])咨詢。