標題:
打開EXCEL檔案 寫入今天日期(分三格)
[打印本頁]
作者:
zamamilo
時間:
2018-11-3 22:25
標題:
打開EXCEL檔案 寫入今天日期(分三格)
各位大大
能否打開EXCEL檔案,就能像附件中將今天的日期分三格自動寫入
作者:
zheng211016
時間:
2018-11-3 23:22
[attach]29629[/attach]
如上圖程式碼
[attach]29630[/attach]
作者:
n7822123
時間:
2018-11-4 03:30
回復
1#
zamamilo
使用函數now(),加上自定儲存格格式
[attach]29632[/attach]
作者:
准提部林
時間:
2018-11-4 10:44
Private Sub Workbook_Open()
d = Date
[工作表1!B3:D3] = Array(Year(d) - 1911, Month(d), Day(d))
End Sub
或
Private Sub Workbook_Open()
[工作表1!B3:D3] = Split(Format(Date, "e/m/d"), "/")
End Sub
作者:
zamamilo
時間:
2018-11-6 18:50
謝謝
zheng211016大大,n7822123大大及准提部林 大大
都很好用,感謝三位大大的協助
歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)