返回列表 上一主題 發帖

日期顯示問題

owen06
　暱稱: 阿軒

中學生Rank: 2

帖子
396 
主題
12 
精華
0 
積分
425 
點名
0  
作業系統
Win10 
軟體版本
Office 2016 
閱讀權限
20 
性別
男 
來自
台中 
註冊時間
2013-7-2 
最後登錄
2024-8-23 

2015羊年全勤獎章2014馬年全勤獎章熱烈參與勳章
1# 跳轉到 »
發表於 2014-11-17 22:25 | 顯示全部帖子
回復 1# gca78000


    在thisworkbook裡新增下列文字，『sheet1』請自行修改
    Private Sub Workbook_Open()
    Sheet1.Label1.Caption = Mid(Format(Date, "yyyy年mm月dd日"), 1, 12)
    End Sub

TOP

        靜思自在 : 地上種了菜，就不易長草；心中有善，就不易生惡。
返回列表 上一主題