Color for results from different sheets

[Cor02767]

HI all,



I am working on a parts list that will have different sheets.
Each sheet will have 100s of parts and youneed to go to each sheet and pick the ones you want. I have a macro where if qty is >1 it will take that row wirth colums a-f to the master parts sheet for the specific job.

So on the master sheet you will only see the parts that have a qty from each sheet. So far so good.


What I would like to do now is to be able to select a specific color that I can pick for each sheet.

So sheet 1 will have 10 parts and those rows will be highlighted in red on the master sheet, then sheet 2 will have 15 parts and those rows will be highlighted in green or what ever color etc.


Can't figure out where or how to select the colors in VBA to make this happen.

Any suggestions?


Thanks

 

[VoG]

To color a cell in VBA

Range("A1").Interior.ColorIndex=3

To get a list of color indexes run this

Sub Colors()
Dim i As Long
Sheets.Add
For i = 1 To 56
    Range("A" & i).Value = 1
    Range("B" & i).Interior.ColorIndex = i
Next i
End Sub

 

[pboltonchina]

Use the Interior property to return the Interior object. The following example sets the color for the interior of cell A1 to red.

Worksheets("Sheet1").Range("A1").Interior.ColorIndex = 3