Dependent Dropdown Lists

[jues]

Dear friends

I use google translator because my english is not very good, specifically my problem is that for a small project in my university I have created three dependent drop-down lists: States, Municipalities, Parishes when using the line of code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("D13").Address Then
Range("G13").Value = ""
End If

It works perfectly since when changing the value of the cell States ("D13") it places the Municipalities cell ("G13") blank, however when repeating the same line of code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("G13").Address Then
Range("I13").Value = ""
End If
End Sub

So that when changing the cell of Municipalities ("G13") leaves the cell of Parishes ("I13") blank, the system begins to indicate an alert that says:

Compilation Error
Ambiguous name detected Worksheet_Change

Could you guide me how to solve this error and what would be the correct lines of code that I should place?
I will be very grateful to you for any help you can give me with this little problem.

 

[James006]

Hi,
In a given sheet module, you can only have one single event of a specific type (such as Worksheet_Change)
So you do need to combine both codes into one ...
You could test following

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Intersect(Target, Range("D13", "G13")) Is Nothing Then Exit Sub
    Select Case Target.Column
        Case 4
            Target.Offset(0, 3).ClearContents
        Case 7
            Target.Offset(0, 2).ClearContents
    End Select
End Sub