У меня есть куча Вкладки месяца
Как можно открыть конкретный способ с помощью VBA? Я пытался с помощью этот фрагмент :
Private Sub Workbook_Open()
Dim ws As Worksheet
Dim mnth As String, dte As String, mday As String
mday = Now() - Weekday(Now(), 3)
mnth = Month(mday)
dte = Day(mday)
tabstr = mnth & "-" & dte
For Each ws In Worksheets
If ws.Name = tabstr Then
ws.Select
Exit For
End If
Next
End sub
но это для имен листов, которые названы в честь дат, отформатированных как mm-dd
например, "11-7" или же "11-14" ,
Как мне изменить этот код, чтобы он работал для имен листов, которые содержат названия месяцев, такие как "Май" , «Июнь» , или же «Июль» ?