Cut and paste cells
That works great but try as I might I can't get it to past.
I tried originally
Sheets("Not Ready").cells(NotReadyRows,1).paste
Then trying to mimic the cut code
With Sheets("Not Ready")
.Range(.Cells(NotReadyRows, 1)).Paste
End With
Not working either way.
Jesse
"Tom Ogilvy" wrote in message
...
With Sheets("Ready")
.Range(.Cells(2,1,),.Cells(ReadyRows-1,11)).cut
End With
--
Regards,
Tom Ogilvy
Jesse Hamilton wrote in message
news:wfVrb.12590$Ws6.9472@edtnps84...
I have a line of code in one of my sheets
Sheets("Ready").Range(Cells(2,1,),Cells(ReadyRows-1,11)).cut
But it only works if the sheet is active, I want it to work without the
sheet being active hence I want to avoid using Sheets("Ready").Activate
Any help?
Jesse
jesse at jesseh.net
|