Hi All

How can i creat a macro that will select every other colum
in the worksheet?

Thanks in advance.

Hi
what are you trying to do with this selection?

--
Regards
Frank Kabel
Frankfurt, Germany

"Tom" schrieb im Newsbeitrag
...
Hi All

How can i creat a macro that will select every other colum
in the worksheet?

Thanks in advance.

actually every other row!

Thanks.
-----Original Message-----
Hi All

How can i creat a macro that will select every other
colum
in the worksheet?

Thanks in advance.
.

Dim rng as Range, cell as Range
for each cell in UsedRange.Columns(1).Cells
if cell.row mod 2 = 0 then
if rng is nothing
set rng = cell
else
set rng = union(rng,cell)
end if
end if
Next
if not rng is nothing then
rng.EntireRow.Select
End if

--
Regards,
Tom Ogilvy



"Tom" wrote in message
...
actually every other row!

Thanks.
-----Original Message-----
Hi All

How can i creat a macro that will select every other
colum
in the worksheet?

Thanks in advance.
.

Hey Frank

I want to shade them! I want to shade every other row.

Thanks.
-----Original Message-----
Hi
what are you trying to do with this selection?

--
Regards
Frank Kabel
Frankfurt, Germany

"Tom" schrieb im
Newsbeitrag
...
Hi All

How can i creat a macro that will select every other
colum
in the worksheet?

Thanks in advance.

.

Hi
for this I would use conditional formating. See:
http://www.cpearson.com/excel/banding.htm

--
Regards
Frank Kabel
Frankfurt, Germany

"Tom" schrieb im Newsbeitrag
...
Hey Frank

I want to shade them! I want to shade every other row.

Thanks.
-----Original Message-----
Hi
what are you trying to do with this selection?

--
Regards
Frank Kabel
Frankfurt, Germany

"Tom" schrieb im
Newsbeitrag
...
Hi All

How can i creat a macro that will select every other
colum
in the worksheet?

Thanks in advance.

.