Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 4
Default Cut and paste cells

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


  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 27,285
Default Cut and paste cells

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




  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 4
Default 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






  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 27,285
Default Cut and paste cells

With Sheets("Ready")
.Range(.Cells(2,1,),.Cells(ReadyRows-1,11)).cut _
Destination:=Sheets("Not Ready).Cells(NotReadyRows,1)
End With

or to use your approach

With Sheets("Not Ready")
.Cells(NotReadyRows, 1).Paste
End With

--
Regards,
Tom Ogilvy

Jesse wrote in message
news:xqZrb.14552$Ws6.8047@edtnps84...
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








Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
need to paste link from 4 vertical cells to 4 horizontal cells? cioangel Excel Discussion (Misc queries) 6 June 8th 09 06:44 PM
PASTE LINK FROM HORIZONTAL CELLS TO VERTICAL CELLS Luis P. Excel Discussion (Misc queries) 2 August 9th 07 04:20 PM
paste locked cells and unlocked cells in protected sheet Angeline Excel Worksheet Functions 15 November 1st 06 11:51 PM
how can I paste 10 cells but inverting the position of the cells Copy and Paste Excel Discussion (Misc queries) 7 June 13th 06 01:48 PM
how can we copy cells comments text and paste to cells שי פלד Excel Discussion (Misc queries) 3 December 12th 05 05:16 AM


All times are GMT +1. The time now is 03:09 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"