View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Bernie Deitrick
 
Posts: n/a
Default Drop-down menu options

consksu,

You could use the worksheet's change event: copy the code below, right click the sheet tab, select
"View Code" and paste the code in the window that appears.

This is written for a single cell (B3, putting the rate into C3), but could easily be re-written for
multiple cells.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$3" Then
If UCase(Target.Value) = "FLAT FEE" Then
Application.EnableEvents = False
Range("C3").Value = Application.InputBox("Enter your fee rate", , , , , , , 1)
Application.EnableEvents = True
End If
End If
End Sub

HTH,
Bernie
MS Excel MVP


"conksu" wrote in message
...

Hi,
I am creating an excel sheet with drop down menus in different cells,
however, I would like to have one option where it would automatically
prompt for text entry. For example, one question is asking whether you
charge a fee based on a call or whether if it is a flat fee. If the
person chooses "Flat fee", I would like it to allow the person to enter
the value of the fee. If it could be some kind of seperate prompt
dialog, that would be ideal.

Thanks!


--
conksu
------------------------------------------------------------------------
conksu's Profile: http://www.excelforum.com/member.php...o&userid=31870
View this thread: http://www.excelforum.com/showthread...hreadid=536790