View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
JW[_2_] JW[_2_] is offline
external usenet poster
 
Posts: 638
Default Conditional formatting?

I don't believe you can use conditional formatting, but you can use
code similar to below in the Worksheet_Change event. Modify to suite:
If WorksheetFunction.Average(Range("E8:G8")) = 50 Then
ActiveSheet.Shapes("Oval 1") _
.Fill.ForeColor.SchemeColor = 37
Else
ActiveSheet.Shapes("Oval 1") _
.Fill.ForeColor.SchemeColor = 65
End If

T. Lindholm wrote:
Is there any way to use conditional formating onto auto shapes from excel
draw. I need to have a triangle shaped object, and it's parts should be able
to change color depending on a list of average values. If someone understands
what I mean by this and could give me an answer, it would be great and highly
appreciated.