autofill

W

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?
 
D

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
 
W

Worzel Gummidge

Any ideas on what the code would be?

Don Guillett said:
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
Click to expand...
 
D

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
 
W

Worzel Gummidge

Tried both Don but no joy sorry.

Thanks anyway - will keep on digging for a code :)
 
D

Don Guillett

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