Force entry into cell, based on validation selection in adjacent cell

[Richhall]

Hi

I've looked at other posts and can't seem to find what I need so
apologies if it is posted elsewhere.

I have two columns, the first column has validation as a List to
select a number of items. If a certain item is selected, then only
for this item, I want the cell in the column next to this item to
prompt the user to enter some data (just text).

So imagine 10 rows, with all in column A as a validated drop down:


A B
1 Banana
2 Banana
3 Apple
4 Cheese Stilton
5 Orange
6 Kiwi
7 Cheese Wenselydale
8 Pear
9 Banana
10 Orange

When Cheese is selected a pop up box appears saying 'Enter Type', and
the user has to enter the type free format?

Is this just some MsgBox VB based on the entry? I.e what type of event
is it if I do the code.

If Range ("A1) = "Cheese" Then
msgBox "Enter Type "
Range ("A2).Select


Also

If I wanted to make the cell colour yellow, until a value is then
entered, what would I enter?

Cheers

Rich

 

[Eduardo]

Hi,
You can apply dependent list, see Debra web for example and explanation

http://www.contextures.com/xlDataVal02.html

 

[Paul C]

The event you are looking for is
Private Sub Worksheet_Change(ByVal Source As Range)

Do Stuff

End sub
This would go on the individual sheet in VBA and not a module.

You can use the Source to only act on certain changes such as
if Source.Column = 1 then
Check for specific inputs and do stuff
If Source.value="Cheese" Then
msgBox "Enter Type in Column B"
end if
end if

Even better you could use an input box and force a type selection and enter
it for them
if Source.Column = 1 then
Check for specific inputs and do stuff
If Source.value="Cheese" Then
chtype = Val(InputBox("Cheese Type"))
Cells(Source.row +1,Source.column)=chtype
end if
end if

 

[Richhall]

Thank you both, that is great, Cheers.