Looping Issues

  • Thread starter Thread starter bgetson
  • Start date Start date
B

bgetson

I've set up a collection of specific worksheets that I'm doing similar
calculations on, and I cycle through each of them using a For
Each....Next Loop. My problem is that occassionally when I cycle
through this process, the loop doesn't seem to end when it's supposed
to. For example, I'm using the following process to add conditional
formatting to each of my selected worksheets.

For Each sh In Collect
With sh.Range("T2:AB" &
intSystems).FormatConditions.Add(xlCellValue, xlEqual, 1)
.Interior.Color = 65280
End With
Next

Where intSystems is a row number (26), and Collect is my collection.

Instead of adding this formatting once to each of my worksheets, it
adds the formatting about 10 times to each sheet.

If anybody has any ideas about causes or solutions I'd really
appreciate it. I'm having compatibility issues when I open this
workbook in older Excel versions.

-bgetson
 
The code is searching range T2:AB26 for the value of 1. The one could be
part of the number such as 126, 12, or 1
 
The only possible values for the selected cells are a 1 or a 0. The
problem isn't that the conditional formatting is giving false
positives. My problem is that the visual basic applies 10 versions of
the same conditional formatting to each cell.
 
This is conditional formating. Each cell is independantly given this
conditional formating. You have 25 rows (rows 2 to 26) and 9 (T to AB)
columns, Therefore the condtion is being placed in 225 cells on each
worksheet.

There can only be three different condtional formating in each cell so I
don't know how you are getting 10.
 
Back
Top