返回列表 上一主題 發帖

有無函式可以取得檔案的建立日期

vvcvc

帖子
144 
主題
33 
精華
0 
積分
178 
點名
0  
作業系統
XP 
軟體版本
Office 2003 
閱讀權限
20 
性別
男 
註冊時間
2010-9-26 
最後登錄
2023-6-23 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2017-3-2 14:01 | 只看該作者

有無函式可以取得檔案的建立日期

每天新增一個excel檔案都要手動填入日期
因有時會忘記填入，故該欄位設定成today()
但後續開啟查看時日期會被更新成開啟時的日期
請問有什麼函式可以取得檔案建立日期或什麼方法可以讓today()不自動更新成最新日期?
收藏 分享

准提部林

帖子
2834 
主題
10 
精華
0 
積分
2890 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2024-11-27 
2#
發表於 2017-3-4 10:55 | 只看該作者
１．新增的檔案是手動？　還是由程式？
２．TODAY()公式怎麼來的？

不麻煩的話，用〔Ctrl + ;〕就可直接輸入當天日期。

TOP

vvcvc

帖子
144 
主題
33 
精華
0 
積分
178 
點名
0  
作業系統
XP 
軟體版本
Office 2003 
閱讀權限
20 
性別
男 
註冊時間
2010-9-26 
最後登錄
2023-6-23 
3#
發表於 2017-3-23 11:56 | 只看該作者
抱歉，沒說清楚
我每天會複製前一天的檔案
再修改檔名，把名稱改成當天的日期
開啟檔案後會再某個格子輸入日期
有時會忘記修改，故該欄位輸入today()
因為這個函式會一直更新，故想知道有沒有辦法取得檔案建立的日期

TOP

准提部林

帖子
2834 
主題
10 
精華
0 
積分
2890 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2024-11-27 
4#
發表於 2017-3-23 14:02 | 只看該作者
回復 3# vvcvc


再修改檔名，把名稱改成當天的日期

使用CELL函數取得檔案名稱, 再截取日期即可~~

檔案名稱???

TOP

ikboy

帖子
262 
主題
8 
精華
0 
積分
280 
點名
17  
作業系統
xp 
軟體版本
Office 2007 
閱讀權限
20 
性別
男 
來自
HK 
註冊時間
2015-8-11 
最後登錄
2024-11-19 

2016猴年全勤獎章
5#
發表於 2017-3-23 15:25 | 只看該作者
@准大 不知是否版本問題, 我用office 2010, cell函數中沒有日期可截取.
寫了以下代碼:
  1. Function zdate() As Date
  2.    zdate = ActiveWorkbook.BuiltinDocumentProperties("last save time")
  3. End Function
複製代碼

TOP

naruto018

帖子
91 
主題
5 
精華
0 
積分
130 
點名
0  
作業系統
Win10 
軟體版本
Office 2010 
閱讀權限
20 
性別
男 
註冊時間
2016-5-14 
最後登錄
2020-5-17 
6#
發表於 2017-3-23 17:54 | 只看該作者
例如：
檔名=20170323.xlsx
填入公式=CELL("filename",$A$1)
會顯示
D:\[20170323.xlsx]工作表1
再用其他公式擷取你要的部分

TOP

vvcvc

帖子
144 
主題
33 
精華
0 
積分
178 
點名
0  
作業系統
XP 
軟體版本
Office 2003 
閱讀權限
20 
性別
男 
註冊時間
2010-9-26 
最後登錄
2023-6-23 
7#
發表於 2017-3-24 09:52 | 只看該作者
本帖最後由 vvcvc 於 2017-3-24 09:53 編輯

准提部林 您好,
我目前即是將檔名把日期包含進去(之前也是在這裡尋問取得檔名的方式)
使用cell並抓取檔名中日期的部份
但檔名只有日期(不包含年度)
在該顯示2/28時發生問題(欲顯示前一天的日期需減1，又因年度未輸入，系統直接帶1900年，3/1前1天會變成2/29)
因為此檔案已發行2年多
於此時變更檔名有點怪
才會想說是否有方法可以帶入正確的年度

TOP

        靜思自在 : 有多少力量就做多少事，不要心存等待，等待才會落空。
返回列表 上一主題