Change pattern based on cell value (Multiple conditions)

As per attached excel file, I want 4 pattern condition to run automatically when text inside cell C6 changed.

http://www.excelforum.com/attachment...1&d=1462856509

Code 1 have so far

Private Sub Worksheet_Change(ByVal Target As Range)
If Sheets("TEST").Range("C6").Value = "Quarterly" Then
Call Change_Pattern_Quarterly
End If
End Sub
'Monthly
'Bimonthly
'Quarterly
'Weekly

Sub Change_Pattern_Monthly()
If Range("C6").Value = "Monthly" Then
    With Range("E10:P32")
        With .Interior
             .Pattern = xlPatternLightUp
        End With
    End With
End If
End Sub

Sub Change_Pattern_Bimonthly()
If Range("C6").Value = "Bimonthly" Then
    With Range("E10:P32,B12:D12,B16:D16,B20:D20,B24:D24,B28:D28,B32:D32")
        With .Interior
             .Pattern = xlPatternLightUp
        End With
    End With
End If
End Sub

Sub Change_Pattern_Quarterly()
If Range("C6").Value = "Quarterly" Then
    With Range("E10:P32,B12:D20,B24:D32")
        With .Interior
             .Pattern = xlPatternLightUp
        End With
    End With
End If
End Sub

Sub Change_Pattern_Weekly()
If Range("C6").Value = "Weekly" Then
    With Range("A10:P32")
        With .Interior
             .Pattern = xlPatternNone
        End With
    End With
End If
End Sub

Why code it when it can be done using Conditional Formatting?

Hi cytop,

already open a thread regarding conditional formatting, nobody want to help..

Not saying it's exactly what you want, but Conditional Formatting applied for the various frequencies. I've used solid colours only because the pattern you had causes moiré effects on my screen. You can edit the fill/patterns to suit yourself.

Hi again cytop, after changing the pattern, it seem doesnt work. anyhelp?

what im missing here?

http://www.excelforum.com/attachment...1&d=1462869724

Thank you cytop, now im understand why my formula didnt work. Need to use "," to apply to multiple area. Many thanks!

=$B$12:$D$20,$B$24:$D$32,$E$10:$P$32

OK, moiré effects

Do you still have a problem? Like I said, I only used a solid color as I didn't fancy a headache when I scroll the worksheet...

Solved. Many Thanks!

That's good. Enjoy.