Adjusting Code for the Month/Quarter

[HazatB]

Good Morning,

I am finishing up a project that uses quarterly reports and have been re-adjusting my code to be generic and with a drop down box can run macro's based on Quarter 1 to 4. I have one issue left where the report name includes the month of the quarter switching from mar to set to june to dec. Is there a method anyone can suggest to have the name adjust for month?

     Dim Quarter As String
     Dim Month As String
     Dim SIFile As String
     Dim SIData As String
     Dim SiName As String
     Dim FiName As String
     Dim MyQtr As String
     'Defining the worksheet variables and the worksheet name
     Sheets("Summary").Select
     Range("X4").Select
     Quarter = Range("X4").Value
     MyQtr = Range("AA4").Value
     
     Range("Z4").Select
     Month = Range("Z4").Value
     
     SIFile = Quarter & "_si_allocation_audit__mar__6_decimal_detail_sjmc.txt"
     SiName = Quarter & "_si_allocation_audit__mar__"