Colorear Celdas

Josema ha escrito:

Hola grupo, quería haceros una preguntilla a ver si podéis ayudarme. El tema
en cuestión es el siguiente: He realizado un horario escolar, y cada vez que
introduzco en una celda una asignatura quisiera que se pusiera de un
determinado color. Por ejemplo lengua en azul, matemáticas en verde, etc...
Pues bien desde la opción de Formato, Formato Condicional pongo la condición
y lo hace, pero solo tres veces y como hay muchas más asignaturas de tres,
no puedo terminar el horario ¿podéis decirme como hacerlo? Una cosa más para
hacerlo selecciono todo el rango en que se encuentran las asignaturas.
Un saludo y gracias por anticipado
Trabajo con Excel 2002.
Josema

Que hay Josema:

Creo que una solución sería gestionar el evento worksheet_change con
un código similar al que te indico:


Private Sub Worksheet_Change(ByVal Target As Range)
If ActiveCell.Value = "lengua" Then
Selection.Interior.ColorIndex = 20
ElseIf ActiveCell.Value = "matemáticas" Then
Selection.Interior.ColorIndex = 15
ElseIf ActiveCell.Value = "inglés" Then
Selection.Interior.ColorIndex = 10
ElseIf ActiveCell.Value = "química" Then
Selection.Interior.ColorIndex = 14
ElseIf ActiveCell.Value = "historia" Then
Selection.Interior.ColorIndex = 16
ElseIf ActiveCell.Value = "religión" Then
Selection.Interior.ColorIndex = 18
End If

End Sub

Debes editar las posibles asignaturas y las combinaciones numéricas
colorindex que se ajusten a tus necesidades.

Atentamente,

Benito Merino