Modify VBA code to include additional columns

[jbolyard]

The following clears the data in column C and D when Column B changes. Need to expand this to include columns E-I. Doesn't seem like this should be that hard but I haven't been able to make it work yet. Thanks in advance!

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
'clear contents of dependent cells
On Error Resume Next
If Target.Validation.Type = 3 Then
  Application.EnableEvents = False
  Select Case Target.Column
    Case 2  'clear columns C and D
      Range(Target.Offset(0, 1), _
        Target.Offset(0, 2)).ClearContents
    Case 3  'clear column D
      Target.Offset(0, 1).ClearContents
  End Select
End If

exitHandler:
  Application.EnableEvents = True
  Exit Sub

End Sub