changing properties of offset cells
 

Hi,

Instead of using the code below, is there a way of setting the
colorindex of offset(0,0) to offset(,4)?

Err.Offset(0, 0).Interior.ColorIndex = 3
Err.Offset(0, 1).Interior.ColorIndex = 3
Err.Offset(0, 2).Interior.ColorIndex = 3
Err.Offset(0, 3).Interior.ColorIndex = 3
Err.Offset(0, 4).Interior.ColorIndex = 3

kind regards,
Matt

changing properties of offset cells
 

I think this does the same as you code:

Err.Resize(1, 5).Interior.ColorIndex = 3

--
HTH :)
Dana DeLouis


"MJKelly" wrote in message ...

Hi,

Instead of using the code below, is there a way of setting the
colorindex of offset(0,0) to offset(,4)?

Err.Offset(0, 0).Interior.ColorIndex = 3
Err.Offset(0, 1).Interior.ColorIndex = 3
Err.Offset(0, 2).Interior.ColorIndex = 3
Err.Offset(0, 3).Interior.ColorIndex = 3
Err.Offset(0, 4).Interior.ColorIndex = 3

kind regards,
Matt

changing properties of offset cells
 

Yes it works, thanks very much.

Matt

changing properties of offset cells
 

You may want to avoid using err as your range variable name. Excel's VBA
already has an Err object.

MJKelly wrote:

Hi,

Instead of using the code below, is there a way of setting the
colorindex of offset(0,0) to offset(,4)?

Err.Offset(0, 0).Interior.ColorIndex = 3
Err.Offset(0, 1).Interior.ColorIndex = 3
Err.Offset(0, 2).Interior.ColorIndex = 3
Err.Offset(0, 3).Interior.ColorIndex = 3
Err.Offset(0, 4).Interior.ColorIndex = 3

kind regards,
Matt

--

Dave Peterson

changing properties of offset cells
 

Thanks Dave, I'll bear that in mind.

kind regards,
Matt