VBA Code to clear

[superfb]

Hi

I have the below code that deletes the dropdown next to it

Private Sub Worksheet_Change(ByVal Target As Range)
    
    'K5 Dropdown changes then clear l5
    
    If Target.Address(0, 0) = "K5" Then Range("L5").ClearContents
End Sub

Howcan I edit the code to delete the below drop down when they change eg k6,k7,k7

 

[gallen]

Hello,

This should do it. Just add any addresses to the select statement, separated by a comma:

Private Sub Worksheet_Change(ByVal Target As Range)
    
    'K5 Dropdown changes then clear l5
    
    'If Target.Address(0, 0) = "K5" Then Range("L5").ClearContents
    
    Select Case Target.Address(0, 0)
        Case "K5", "K6", "K7"
            Range("L" & Target.Row).ClearContents
    End Select
End Sub

 

[superfb]

Hi that s,great however I have 100 rows...

 

[Fluff]

How about

Private Sub Worksheet_Change(ByVal Target As Range)
   If Not Intersect(Target, Range("K5:K105")) Is Nothing Then
      Target.Offset(, 1).ClearContents
   End If
End Sub