| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Go to next blank row
I wish to copy a row of data 2:2 from Sheet 1 to the next blank row in Sheet
2, would appreciate VBA code to execute. Many thanks |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Go to next blank row
with worksheets("Sheet2")
worksheets("Sheet1").rows(2).copy _ Destination:= .Cells(rows.count,1).End(xlup)(2) End With -- Regards, Tom Ogilvyl "Andy Josolyne" <Andy wrote in message ... I wish to copy a row of data 2:2 from Sheet 1 to the next blank row in Sheet 2, would appreciate VBA code to execute. Many thanks |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Go to next blank row
Andy,
Worksheets("Sheet1").Range("2:2").EntireRow.Copy _ Worksheets("Sheet2").Range("A65536").End(xlUp)(2). EntireRow HTH, Bernie MS Excel MVP "Andy Josolyne" <Andy wrote in message ... I wish to copy a row of data 2:2 from Sheet 1 to the next blank row in Sheet 2, would appreciate VBA code to execute. Many thanks |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Go to next blank row
Many thanks, please advise what is required to paste special as values in
Sheet 2 "Bernie Deitrick" wrote: Andy, Worksheets("Sheet1").Range("2:2").EntireRow.Copy _ Worksheets("Sheet2").Range("A65536").End(xlUp)(2). EntireRow HTH, Bernie MS Excel MVP "Andy Josolyne" <Andy wrote in message ... I wish to copy a row of data 2:2 from Sheet 1 to the next blank row in Sheet 2, would appreciate VBA code to execute. Many thanks |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Go to next blank row
Andy,
Worksheets("Sheet1").Range("2:2").EntireRow.Copy Worksheets("Sheet2").Range("A65536").End(xlUp)(2) _ .EntireRow.PasteSpecial Paste:=xlPasteValues HTH, Bernie MS Excel MVP "Andy Josolyne" wrote in message ... Many thanks, please advise what is required to paste special as values in Sheet 2 "Bernie Deitrick" wrote: Andy, Worksheets("Sheet1").Range("2:2").EntireRow.Copy _ Worksheets("Sheet2").Range("A65536").End(xlUp)(2). EntireRow HTH, Bernie MS Excel MVP "Andy Josolyne" <Andy wrote in message ... I wish to copy a row of data 2:2 from Sheet 1 to the next blank row in Sheet 2, would appreciate VBA code to execute. Many thanks |
|
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Go to next blank row
Dear Bernie
Many many thanks for your amazingly fast response. Regards Andy Josolyne "Bernie Deitrick" wrote: Andy, Worksheets("Sheet1").Range("2:2").EntireRow.Copy Worksheets("Sheet2").Range("A65536").End(xlUp)(2) _ .EntireRow.PasteSpecial Paste:=xlPasteValues HTH, Bernie MS Excel MVP "Andy Josolyne" wrote in message ... Many thanks, please advise what is required to paste special as values in Sheet 2 "Bernie Deitrick" wrote: Andy, Worksheets("Sheet1").Range("2:2").EntireRow.Copy _ Worksheets("Sheet2").Range("A65536").End(xlUp)(2). EntireRow HTH, Bernie MS Excel MVP "Andy Josolyne" <Andy wrote in message ... I wish to copy a row of data 2:2 from Sheet 1 to the next blank row in Sheet 2, would appreciate VBA code to execute. Many thanks |
|
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Go to next blank row
not good how can I modify this to copy from data sheet E:L cells
to donors A:H paste I dont follow the 2:2 "Bernie Deitrick" wrote: Andy, Worksheets("Sheet1").Range("2:2").EntireRow.Copy Worksheets("Sheet2").Range("A65536").End(xlUp)(2) _ .EntireRow.PasteSpecial Paste:=xlPasteValues HTH, Bernie MS Excel MVP "Andy Josolyne" wrote in message ... Many thanks, please advise what is required to paste special as values in Sheet 2 "Bernie Deitrick" wrote: Andy, Worksheets("Sheet1").Range("2:2").EntireRow.Copy _ Worksheets("Sheet2").Range("A65536").End(xlUp)(2). EntireRow HTH, Bernie MS Excel MVP "Andy Josolyne" <Andy wrote in message ... I wish to copy a row of data 2:2 from Sheet 1 to the next blank row in Sheet 2, would appreciate VBA code to execute. Many thanks |
|
#8
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Go to next blank row
2:2 designates row 2.
You need to do a better job of describing what you need. It is hard to understand what you want when you say: "copy from data sheet E:L cells to donors A:H paste" Is it a sheet called "data"? Is it a sheet called "donors"? Are you copying Column E:L to A:H? Worksheets("data").Columns("E:L").Copy Worksheets("donor").Range("A1").PasteSpecial xlPasteValues Regards, Alan "Curt" wrote in message ... not good how can I modify this to copy from data sheet E:L cells to donors A:H paste I dont follow the 2:2 "Bernie Deitrick" wrote: Andy, Worksheets("Sheet1").Range("2:2").EntireRow.Copy Worksheets("Sheet2").Range("A65536").End(xlUp)(2) _ .EntireRow.PasteSpecial Paste:=xlPasteValues HTH, Bernie MS Excel MVP "Andy Josolyne" wrote in message ... Many thanks, please advise what is required to paste special as values in Sheet 2 "Bernie Deitrick" wrote: Andy, Worksheets("Sheet1").Range("2:2").EntireRow.Copy _ Worksheets("Sheet2").Range("A65536").End(xlUp)(2). EntireRow HTH, Bernie MS Excel MVP "Andy Josolyne" <Andy wrote in message ... I wish to copy a row of data 2:2 from Sheet 1 to the next blank row in Sheet 2, would appreciate VBA code to execute. Many thanks |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Index/match - make blank cells return a blank value. | Excel Worksheet Functions | |||
| Excel 2002: Return blank when VLOOKUP on blank cells | Excel Discussion (Misc queries) | |||
| Average Formula to display blank cell if named range is blank | Excel Worksheet Functions | |||
| Not showing blank and non blank items in filter mode for values | Excel Worksheet Functions | |||
| Copying and pasting a worksheet to a blank and removing blank rows | Excel Programming | |||
Hybrid Mode
