excel 根据每月更改的路径和名称确定打开文件的当前月份

gmxoilav 于 2022-12-01 发布在其他

关注(0)|答案(1)|浏览(124)

我正在微软2010操作系统和Excel 365中编写。我已经编写了一个脚本来处理一个150K的行文件。
它打开位于SharePoint驱动器中的源文件：
“\（服务器名称）\SQL文件\2022\06.2022\2022年6月名称. xlsx”
在过去的一年中，每个月都有文件，随着月份的进展，会创建一个新文件夹。
在六月，没有七月的文件夹，但将其写入为2022\07.2022\July2022Name.xlsx
我想打开与当前月份匹配的文件。
这是我目前所尝试的

'Find Workbook Filename <br>
Dim dt as String, dt2 as string
Filename as String, strMonth as string<br>

strMth = Monthname(Month(Now()), True<br>
if Month(Now()) = 1 Then<br>
   strPriorMth = MonthName(12,True)<br>
Else st PriorMth = Monthname(Month(Now())-1, True<br>
dt2 = StrMonth(mm).YYYY
dt = StrMonth(mmm)YYYY
<br>
filename = "\\(server name)\SQL Files\2022\"dt2"\"dt & "SqlViews.xlsx"<br>

我不确定如何将dt2转换为数字字符串，将dt转换为我认为是nvarchar的字符串。

excel

来源：https://stackoverflow.com/questions/72719337/determine-current-month-to-open-file-based-on-path-and-name-that-changes-monthly

1条答案

按热度按时间

o0lyfsai1#

不确定你想要的确切输出。但这里有一个例子。

Sub test()

Dim dt As String, dt2 As String
Dim filename As String, strMonth As String

strMth = MonthName(Month(Now()))
If Month(Now()) = 1 Then
    mth = "12"
    strPriorMth = MonthName(12, True)
Else
    mth = Month(Now() - 1)
    strPriorMth = MonthName(Month(Now()) - 1, True)
End If

dt = Format(mth, "mm")
dt2 = Format(mth, "mmm")

filename = "\\(server name)\SQL Files\2022\" & dt2 & "\" & dt & "SqlViews.xlsx"

Debug.Print filename

End Sub

赞(0）回复(0）举报 2022-12-01

我来回答

excel 根据每月更改的路径和名称确定打开文件的当前月份

1条答案

相关问题

热门标签

最新问答