Como puedo hacer para que esta macro la pueda utilizar en un rango determinado no solo el la fila A1 y B2 si no en varias Filas

Private Sub Worksheet_Change(ByVal Target As Range)

If Target = Range("A2") Then
    Range("B2").Value = ""
End If

End Sub

 

listas desplegables (dependientes).xlsm

Hola

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
    'Puedes hacerlo con...
    Target.Next.Value = ""
    'Pero la anterior tal vez no funcione (depende de la configuración de tu Excel) así que también puedes hacerlo de esta forma
    Target.Offset(0, 1).Value = ""
End If
End Sub