what's the best way to copy a non-contiguous row of formulas one row below it.

for example, A10, c10, e10:h10

so they end up in row 11

i tried union but didn't get it to work.

--


Gary

Insert a row above.



"Gary Keramidas" <GKeramidasATmsn.com schreef in bericht
...
what's the best way to copy a non-contiguous row of formulas one row below
it.

for example, A10, c10, e10:h10

so they end up in row 11

i tried union but didn't get it to work.

--


Gary

Sub AAA()
Dim ar As Range
For Each ar In Range("A11").Range("A1,C1,E1:H1").Areas
ar.FillDown
Next
End Sub


--
Regards,
Tom Ogilvy




"Gary Keramidas" <GKeramidasATmsn.com wrote in message
...
what's the best way to copy a non-contiguous row of formulas one row below
it.

for example, A10, c10, e10:h10

so they end up in row 11

i tried union but didn't get it to work.

--


Gary

thanks for that, tom

--


Gary


"Tom Ogilvy" wrote in message
...
Sub AAA()
Dim ar As Range
For Each ar In Range("A11").Range("A1,C1,E1:H1").Areas
ar.FillDown
Next
End Sub


--
Regards,
Tom Ogilvy




"Gary Keramidas" <GKeramidasATmsn.com wrote in message
...
what's the best way to copy a non-contiguous row of formulas one row below
it.

for example, A10, c10, e10:h10

so they end up in row 11

i tried union but didn't get it to work.

--


Gary