麻辣家族討論版版 » Excel程式區 » 請益，Excel 開啟特定年月份資料夾。

返回列表下一主題上一主題發帖

[發問] 請益，Excel 開啟特定年月份資料夾。

中學生 Rank: 2

帖子: 50
主題: 15
精華: 0
積分: 75
點名: 1
作業系統: WIN10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2021-7-21
最後登錄: 2024-6-14

1^# 跳轉到 » 正序看帖

字體大小: tT

發表於 2021-8-24 21:30 | 只看該作者

[發問] 請益，Excel 開啟特定年月份資料夾。

目前有寫一個簡易的，不過只能開啟指定的路徑，如下。

Sub Test（）

Vba.shell "explorer.exe D:\AA\BB\CC", 1

End Sub

CC資料夾裡面有年月份的子資料夾，名稱有2021.01 & 2021.02 & 2021.03。依此類推的子資料夾。
假設今天日期為2021/09/05，vba就會自動開啟路徑下的2021.09的這個子資料夾。

請各位大大協助解救，謝謝。

樓主熱帖

收藏

中學生 Rank: 2

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

2016猴年全勤獎章

3^#

發表於 2021-8-26 08:49 | 只看該作者

Sub Test()
CC = Format(Date, "yyyy.mm")
VBA.Shell "explorer.exe D:\AA\BB\" & CC, 1
End Sub

複製代碼

大學生 Rank: 4

帖子: 976
主題: 7
精華: 0
積分: 1018
點名: 0
作業系統: Win10
軟體版本: Office 2016
閱讀權限: 50
性別: 男
註冊時間: 2013-4-19
最後登錄: 2024-10-30

2^#

發表於 2021-8-25 07:23 | 只看該作者

回復 1# zz0660

請問一下是不是和下面這個一樣? 謝謝
http://forum.twbts.com/thread-23336-1-1.html

靜思自在 : 忘功不忘過，忘怨不忘恩。

返回列表下一主題上一主題