Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
paste to next free colum on new Worksheet
Hi,
I have a sheet with one colum of results, those results I would like to paste onto the next worksheet into the frist empty colum after the data of the previous results, in order to create a kind of history. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
paste to next free colum on new Worksheet
Try this:
Sub PasteColumn() Dim myRange As Variant Dim mySheet As Worksheet Set mySheet = Worksheets("Sheet2") Set myRange = mySheet.Range("A1").CurrentRegion If myRange.Cells.Count 1 Or (myRange.Cells.Count = 1 And myRange.Cells(1).Value < "") Then Set myRange = myRange.Offset(0, myRange.Columns.Count).Resize(1, 1) Else Set myRange = mySheet.Range("A1") End If Worksheets("Sheet1").Columns(1).Copy (myRange) End Sub "Ralph" wrote: Hi, I have a sheet with one colum of results, those results I would like to paste onto the next worksheet into the frist empty colum after the data of the previous results, in order to create a kind of history. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
EARN,20000$ & ALL TYPES SOFTWARE FREE DOWNLOAD,& KATRINA KAIF OPENVIDEOS & WEBSITE DEV TO FREE ALL OVER THE WORLD`S PEOPLE | Excel Worksheet Functions | |||
Free social world wide network pays for 10 generations! Free! | Excel Discussion (Misc queries) | |||
Where free 2 sigma statistical process control chart, free? | Charts and Charting in Excel | |||
Copy multiple worksheet into one colum | Excel Discussion (Misc queries) | |||
free hour calculation worksheet | New Users to Excel |