Using the intersect Method to Create a New Range from Overlapping Ranges

The Intersect method returns the cells that overlap between two or more ranges: Application.Intersect(argument1, argument2, etc.)

The following code colors the overlapping cells of the two ranges, as shown in Figure 3.4:

Set IntersectRange = Intersect(Range("Range1"), Range("Range2")) IntersectRange.Interior.Colorindex = 6

Figure 3.4

The Intersect method returns overlapping cells.

Figure 3.4

The Intersect method returns overlapping cells.

0 0

Post a comment