Thread: Colours
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Bob Flanagan Bob Flanagan is offline
external usenet poster
 
Posts: 340
Default Colours

One approach is to put the following in the combobox change event code
(reached by double clicking on the combo box:

Private Sub ComboBox1_Change()
Dim iColor As Integer
Select Case Me.ComboBox1.value
Case 1: iColor = 5
Case 2: iColor = 4
Case 3: iColor = 3
End Select
If Me.ComboBox1.ListIndex = 0 Then
ActiveCell.EntireRow.Interior.ColorIndex = iColor
End If
End Sub

The values of the colors were obtained by using the macro recorded.

Bob Flanagan
Macro Systems
http://www.add-ins.com
Productivity add-ins and downloadable books on VB macros for Excel

"Sam" wrote in message
...
All i want to know is say you have a drop down list with
numbers 1, 2 and 3 then when you select 1 it makes the
whole row blue, select 2 it makes the whole row green,
select 3 it makes the whole row red.
I know how to make lists etc but not how to make it
automaticaly change the row colour.

Please Help

Sam