Can I conditionally format a line based on a cell value

  • Thread starter Thread starter eoinp
  • Start date Start date
E

eoinp

I want a 2003 Excel autoshape to have a dashed line if a particular cell
value is zero or solid if the value is one. Can Excel do this?
 
I do not believe that can be done. I would suggest using a Pivot Table so you
can parse out the data you need, then you can click in the date field, go to
Data - sort, and click descending...
 
Thanks - I suspected that this was the case - I could probably do what I want
with a VB macro but that seems like way too much work. Unfortunately, the
data is streaming from field instruments so a Pivot Table may be even more
cumbersome than a Macro....
 
Oops.. I put this uder the wrong question...

For this one, You can create such a thing using a Macro, but those aren't my
strong suit...
 
Not without VBA

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Me.Range("A1")) Is Nothing Then Exit Sub
On Error GoTo endit
Application.EnableEvents = False
With ActiveSheet.Shapes("AutoShape 1")
If ActiveSheet.Range("A1").Value = 1 Then
.Line.DashStyle = msoLineSolid
ElseIf ActiveSheet.Range("A1").Value = 0 Then
.Line.DashStyle = msoLineDashDot
End If
End With
endit:
Application.EnableEvents = True
End Sub


This is sheet event code. Right-click on the sheet tab and "View Code".

Copy/paste the code into that module.

Enter a 1 or 0 in A1 and see the autoshape lines change.


Gord Dibben MS Excel MVP
 
Back
Top