Fill data validation cell

[sujittalukde]

In the attached file, the sheet named Validation contains Data Validation List.

The drop down for cell B1 is dependant on Cell A1.

If in cell A1, Vegetable is selected then the drop down list in cell B1 shows items related to Vegetables only.

If I change the cell A! from Vegetable to NA, the cell B1 keeps the earlier value say Potato ( ie the value that was chosen when the cell A1 = Vegetable).
I want that if the value at cell A1 is changed to NA the value at cell A! should also change to Blank or NA automatically.

How this can be done?

[Bob Phillips]

.

[sujittalukde]

thanks xld, but can a non macro solution be provided?

the given macro works for one cell ie A1 only. Now i want to extend the cells in Column A. What will be modified macro now

File attached.

[Bob Phillips]

[vba]


Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
Target.Offset(0, 1).Value = ""
End If
End Sub
[/vba]

[sujittalukde]

Thanks its working great.
Is macro the only solution to it?
Any non macro solution . . . ..