Hi All,
I am trying to design a macro that does the following:
1. Allows user to input a value in a cell
2. If the value is 'Yes", display a list
3. If the value is 'No', display 'No' in the following Cell
I have tried the code below but get a message saying that the stack is out of space
Private Sub WorkSheet_Change(ByVal target As Range)
If Range("$C$14") = "Yes" Then
With Range("$C$16").Validation
.Delete
.Add xlValidateList, , , "=NA"
.IgnoreBlank = True
.InCellDropdown = True
End With
ElseIf Range("$C$14") = "No" Then
Range("$C$16") = "No"
End If
End Sub
Bookmarks