automatically creating tabs for 12 months

[ammartino44]

Hello. This code creates tabs for each month of the year. A couple of questions: What does the "Workbooks.Add" piece do at (the first one)? What is the worksheet.add count piece (12-ActiveWorkbook etc.) doing? The rest I understand. Thanks.

Sub MonthSheets()
    Dim intCounter As Integer
    Application.ScreenUpdating = False
    Workbooks.Add
    Worksheets.Add Count:=12 - ActiveWorkbook.Worksheets.Count
    For intCounter = 1 To 12
        Worksheets(intCounter).Name = _
         Format(DateSerial(1, intCounter, 1), "mmmm")
    Next intCounter
Application.ScreenUpdating = True
End Sub