USER FORM ISSUES: Clear data from various ranges using checkboxes and other issues.

[snb]

Sub M_snb()
  For j = 13 To 24
    if Me("checkbox" & j) Then Sheets("Schedule").Range(MonthName((j - 4) Mod 12, True) & "_pay").ClearContents
  Next
End Sub