autofill

[Worzel Gummidge]

In column I, I have a dropdown menu listing either "yes" or "no".

What I would like to do is, when any other cell within that row contains
data, for the cell in colum I to change automatically to "no" until user
changes it to "yes"

So for example, if I enter any data into cells A1 or B1 or C1 etc etc, then
cell I1 will automatically fill with the word "no"

Any suggestions?

 

[Don Guillett]

You can do this with a worksheet_change event.Right click sheet tab>view
code>left window select worksheet>right window>select worksheet_change.
Write code

 

[Worzel Gummidge]

Any ideas on what the code would be?

You can do this with a worksheet_change event.Right click sheet tab>view
code>left window select worksheet>right window>select worksheet_change.
Write code

 

[Don Guillett]

try

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 3 Then Exit Sub
Cells(Target.Row, "i") = "No"
End Sub
or
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 3 Then Exit Sub
If UCase(Cells(Target.Row, "i")) <> "YES" Then _
Cells(Target.Row, "i") = "No"
End Sub

 

[Worzel Gummidge]

Tried both Don but no joy sorry.

Thanks anyway - will keep on digging for a code

 

[Worzel Gummidge]

Managed to sort a way around this problem - thanks

 

[Don Guillett]

What I sent you DOES work properly. It was tested. Did you place in the
sheet module? What did you do?