PDA

View Full Version : Solved: Range question



remy988
12-13-2012, 11:01 AM
is there a shorter way to write this
cell.Offset(0, 6).NumberFormat = "@"
cell.Offset(0, 7).NumberFormat = "@"
cell.Offset(0, 8).NumberFormat = "@"
cell.Offset(0, 9).NumberFormat = "@"
cell.Offset(0, 10).NumberFormat = "@"
cell.Offset(0, 11).NumberFormat = "@"


thanks
rem

jolivanes
12-13-2012, 11:46 AM
There are lots of ways.
This is one way of many possibilities

cell.Offset(,6).Resize(,6).NumberFormat = "@"

remy988
12-15-2012, 10:40 AM
jolivanes,

works great! thanks

rem