Make VBA refer to first cell only in .Selection?

[Gates Is Antichrist]

For i = 1 To Selection.Rows.Count
ActiveCell.Offset(i - 1, 0).RowHeight=foo(i)

That's bad code. It's supposed to set the selection's row heights from array foo, and it's fine ... UNLESS ... ActiveCell is not the first row in the selection.

So I'd like one of two solutions, if you don't mind helping me:
A. set Activecell to first cell in selection, preserving selection
(then code is okay as is. Is this something like activecell.row=selection.row?)
OR
B. change the code.
(Unfortunately
Selection.Offset(i - 1, 0).RowHeight=foo(i)
sets Selection.Rows.Count rows en masse! It should only do 1 at a time)

Hep me! Hep me!

 

[Norie]

What exactly are you trying to do here?

Do you need to work with Selection?

 

[Gates Is Antichrist]

Exactly what I said Norie. Just like the next response, which will answer the question instead of asking another [rhetorical] one.

 

[Norie]

Look I'm sorry but, to me at least, the post is rather unclear.

Sometimes it helps when one has an overview of the whole thing.

 

[Andrew Poulsom]

How about?

For i = 1 To Selection.Rows.Count 
Selection.Cells(i, 1).Offset(i - 1, 0).RowHeight=foo(i)

 

[Gates Is Antichrist]

That's precisely what I need, Andrew - thanks. One thing though - change the first "i,1" to "1,1" or lose the offset, as this skips every other row as written.

In fact that's excellent - the syntax to directly refer to any part of the selection. I'll just drop the offset entirely!

Way to go - thanks.