View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
[email protected] john.9.williams@bt.com is offline
external usenet poster
 
Posts: 104
Default Another ComboBox Issue

Darrin,

Hi You do not need any of this code if your combo box is on a userform
set the properties for the control source to sheet1!e20

then what ever you choose from the combobox be from the list or your
own input it will appear in e20

If Contract1.Value = 0 Then ActiveWorkbook.Worksheets
_("Sheet1").Range("E20") = "Option 0"
If Contract1.Value = 1 Then ActiveWorkbook.Worksheets
_("Sheet1").Range("E20") = "Option 1"
If Contract1.Value = 2 Then ActiveWorkbook.Worksheets
_("Sheet1").Range("E20") = "Option 2"
If Contract1.Value = 3 Then ActiveWorkbook.Worksheets
_("Sheet1").Range("E20") = "Option 3"


regards
johny5