View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
sugargenius sugargenius is offline
external usenet poster
 
Posts: 26
Default border non-contiguous rows

I'm building a report and certain sub-total rows need top/bottom
border. The actual rows to be "bordered" will vary. I can border the
subtotals as I create them, but i thought it would tidier if I kept
track of the rows to be bordered and did them all at once. Is this
possible:

<pseudocode
dim rowstoborder as string
rowstoborder = "5"
rowstoborder = rowstoborder & "," & "10"
rowstoborder = rowstoborder & "," & "20"

with rows( rowstoborder )
.Borders.LineStyle = xlNone
.Borders(xlEdgeTop).LineStyle = xlContinuous
.Borders(xlEdgeTop).Weight = xlThick
.Borders(xlEdgeBottom).LineStyle = xlContinuous
.Borders(xlEdgeBottom).Weight = xlThick
end with

</pseudocode