我正在嘗試使用我選擇的年份和月份創建一個檔案夾。我的問題是月份名稱（在本例中為一月）一直顯示為 1 而不是 01。我在代碼中的任何地方都嘗試了 Format 函式的幾種變體，但仍然回傳 1。請參閱下面的代碼
Sub CreateFolder()
Dim sMonthName As String
Dim iMonthNumber As Integer
sMonthName = ThisWorkbook.Worksheets("Overview").Range("C2")
iMonthNumber = Month(DateValue("01-" & sMonthName & "-1900"))
MkDir "FILE PATH" & ThisWorkbook.Worksheets("Overview").Range("C3") & "." & iMonthNumber
End Sub
概覽選項卡中的單元格 C2 是我擁有月份名稱的位置，而同一選項卡中的單元格 C3 是我擁有年份的位置。有沒有辦法將月份回傳為兩位數？如果您需要更多資訊，請告訴我
謝謝你。
uj5u.com熱心網友回復：
您可以通過創建一個包含月份和年份的日期來簡化一點，然后使用Format$：
With ThisWorkbook.Worksheets("Overview")
Dim dt As Date
dt = DateValue("01-" & .Range("C2").Value & "-" & .Range("C3").Value)
End With
MkDir "FILE PATH" & Format$(dt, "yyyy.mm")
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/433522.html