Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 2
Default Copy Values to next empty cell range

How can I program this? I want to copy c19:g19 on sheet1, to the same sheet,
and paste special(values) to the next empty row in this cell range, K5:O35.

Thanks in advance,

John

  #2   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 22,906
Default Copy Values to next empty cell range

Sub findbottom_paste()
Set rng1 = ActiveSheet.Cells(Rows.Count, "K").End(xlUp) _
.Offset(1, 0)
Range("C19:G19").Copy _
Destination:=rng1
End Sub


Gord Dibben MS Excel MVP

On Mon, 10 Mar 2008 16:22:43 -0500, "Aldo Cella" wrote:

How can I program this? I want to copy c19:g19 on sheet1, to the same sheet,
and paste special(values) to the next empty row in this cell range, K5:O35.

Thanks in advance,

John


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
Copy row with an empty cell for each row in a sheet [email protected] Excel Discussion (Misc queries) 2 April 24th 07 05:18 AM
Copy from row above if cell is empty in column Jacky D. Excel Discussion (Misc queries) 2 December 20th 05 07:36 PM
Copy a string text to cell if another cell not empty Pasmatos Excel Discussion (Misc queries) 0 November 25th 05 03:54 PM
Picking up the last non-empty cell in a given range zhj23 Excel Discussion (Misc queries) 4 June 1st 05 12:34 AM
Grabbing the last Non-empty cell in a range Arlen Excel Discussion (Misc queries) 2 January 22nd 05 05:15 PM


All times are GMT +1. The time now is 06:12 PM.

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"