返回列表 上一主題 發帖

日期顯示問題

owen06
　暱稱: 阿軒

中學生Rank: 2

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

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

        靜思自在 : 一個缺口的杯子，如果換一個角度看它，它仍然是圓的。
返回列表 上一主題