Hi guys,
I'm creating a file with a Sheet called MI Summary. There are two drop down lists in the sheet, D3 (named range COLLEAGUE) and H3 (named range TEAM). I've tried using the below code but it doesn't work. Basically what I'm trying to do is if either COLLEAGUE or TEAM changes, I'd like the opposite range to have it's cell contents cleared. After it's cleared, I want to run a formatting macro. Code is below and is located in the MI Summary sheet of my Objects.
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
If Not Intersect(Target, Range("COLLEAGUE,Team")) Is Nothing Then
Range("TEAM").Select
Selection.ClearContents
Call CondFormat
Exit Sub
Else
Range("COLLEAGUE").Select
Selection.ClearContents
Call CondFormat
Exit Sub
End If
Application.ScreenUpdating = True
End Sub
Bookmarks