Since you are always using English month names, why not just hard-code them like this:
Code:
Function EnglishMonthName(ByVal nMonth As Long) As String
Dim monthNames() As Variant
monthNames = Array("January", "February", "March", _
"April", "May", "June", "July", "August", _
"September", "October", "November", "December")
EnglishMonthName = monthNames(nMonth - 1)
End Function
Then you can use this function instead of VBA's MonthName