rows().value

G

greg carter

My code has these 3 lines to swap rows.

Rows(120).Value = Rows(z).Value

Rows(z).Value = Rows(x).Value

Rows(x).Value = Rows(120).Value

Is this the only way to do it?

Also, the formulas are destroyed when using this, and

I need to retain them.

Thanx ahead,
Greg Carter
 
B

Bob Phillips

Hi Greg,

Try this

Rows(120).Copy
Rows(z).PasteSpecial Paste:=xlAll
Application.CutCopyMode = False


--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
Top