Trending News
Promoted
vba sheet 新增 by 日期問題...急
請問我有兩個 workbooks-->source & write
write 裡面的 sheets 會因為當天日期不同而新增...比如今天31則新增sheet("31")
明天1 則新增 sheet("1")
而 每天將 source 中的資料寫入 write 中 sheet("當天日期")
請高手幫幫忙吧
Update:
我是想用 vba 寫這個巨集
2 Answers
Rating
- 1 decade agoFavorite Answer
'此程式置於write
Private Sub Workbook_Open()
'判斷是否已複製
If Sheets(Sheets.Count).Name = Format(Date, "yyyymmdd") Then
'已複製則選取並離開程式
Sheets(Sheets.Count).Select
Exit Sub
End If
'複製source工作頁Sheet1內容於write工作頁之後
Workbooks.Open("C:\source.xls").Sheets("Sheet1").Copy After:=Sheets(Sheets.Count)
'變更工作頁名稱為日期
Sheets(Sheets.Count).Name = Format(Date, "yyyymmdd")
End Sub
Still have questions? Get your answers by asking now.