返回列表 上一主題 發帖

[發問] 加入自行抓取當天日期

准提部林

帖子
2839 
主題
10 
精華
0 
積分
2895 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2025-2-15 
1# 跳轉到 »
發表於 2023-5-10 11:00 | 顯示全部帖子
公式引用路徑不可以用文字串, 一般可用INDIRECT, 但外部引用不好用//
假設公式在 D 欄//VBA--取代法
SUB 公式取代()
  RANGE("D:D").REPLACE "_量產模具異動*.xlsm", "_量產模具異動" & FORMAT(DATE,"yyyymmdd") & ".xlsm", LOOKAT:=XLPART
END SUB
=========================
或者//在 H1 輸入指定日期:如 2023/5/10
SUB 公式取代2()
  RANGE("D:D").REPLACE "_量產模具異動*.xlsm", "_量產模具異動" & FORMAT([H1],"yyyymmdd") & ".xlsm", LOOKAT:=XLPART
END SUB


自行加按鈕執行

TOP

准提部林

帖子
2839 
主題
10 
精華
0 
積分
2895 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2025-2-15 
2#
發表於 2023-5-10 11:04 | 顯示全部帖子
如果外檔 B1 是數值, 公式可改下//
=IFERROR(1/(1/'\\shl-group.com\dept\MFMG\B.各組資料 (Team inform)\E.生管組 (PPC group)\D.生產相關\2.每日模具異動\模具異動 B1+M5+M6+M7\2023\[MFMG3_33_47_53_MFMG5_6_7_126_163_173_174_量產模具異動.xlsm]排程'!$B1&""),"")

TOP

        靜思自在 : 站在半路，比走到目標更辛苦。
返回列表 上一主題