Try this:
For my example, I'll assume :
List 1 is in Cell A1 (independent)
List 2 is in Cell C1 (dependent)
Right click on the sheet tab and select "View Code"
(That will open the VBA editor)
Copy/Paste this code into the sheet module:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1")) Is Nothing Then
Range("C1").ClearContents
End If
End Sub
Switch back to the worksheet and test.
Does that help?
Ron
--
Ron Coderre
------------------------------------------------------------------------
Ron Coderre's Profile:
http://www.excelforum.com/member.php...o&userid=21419
View this thread:
http://www.excelforum.com/showthread...hreadid=382451