Trigger code when a Cell is entered with a specific Value

[davefish]

I have read thread707-938434 and this is very good at triggering a piece of code when exitiing a cell. However, what I'm trying to do is trigger code on entering a specific value in a field from list. The code within the trigger would only be as shown below

If [C10].Value = "Guest" Then
Guest_Form.Show

End If
Guest form then allows a user to enter name and department, which is then in turn used in a differnet sheet. Unfortunatley I cannot get code to work when a cell has focus. Can aynone help?

 

[SkipVought]

hi,

in the Sheet Code Window (right-click the sheet tab and select View Code), paste this code...

Private Sub Worksheet_Change(ByVal Target As Range)
If not intersect(target, [C10]) is nothing then
  if target.value = "Guest" Then _
     Guest_Form.Show
end if
End Sub

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[davefish]

Thanks Skip,

That work perfectly