Code:For i = 1 To 12 If Me("Checkbox" & i) Then Sheets("Schedule").Range(Choose(i, "sep_std", "oct_std", "nov_std", "dec_std", _ "jan_std", "feb_std", "mar_std", "apr_std", "may_std", "jun_std", "jul_std", "aug_std")).ClearContents Next
Code:For i = 1 To 12 If Me("Checkbox" & i) Then Sheets("Schedule").Range(Choose(i, "sep_std", "oct_std", "nov_std", "dec_std", _ "jan_std", "feb_std", "mar_std", "apr_std", "may_std", "jun_std", "jul_std", "aug_std")).ClearContents Next
Bookmarks