Format Charts Upbars, Downbars And Droplines

I have a macro that charts data as line charts. I wish to format droplines and updown bars to different colors. The challenge is that some charts do not have upbars and others do not have down bars. Is it possible to skip? The formatting code I used was:

Sub Formatter()
With ActiveChart
With .ChartGroups(1)
.HasDropLines = True
.HasUpDownBars = True
.GapWidth = 90
End With
.ChartGroups(1).UpBars.Select
With Selection
.Border.ColorIndex = 5
.Interior.ColorIndex = 5
End With ........................