Search : in
By :

Copy data into next empty cell in new sheet

Last answer on Oct 13, 2009 5:02:46 am BST nikwak, on Jul 24, 2008 3:23:42 pm BST 
 Report this message to moderators

Hello,

I am trying to make a 2 sheet workbook which has the input details in Sheet1
A1 and this is changed weekly but the info in this cell should then be
inserted into the first blank cell in Column A in Sheet 2.

I have tried this code (below) but it doesn't seem to work and maybe I am
doing something wrong. Could someone let me know if this code should work
for this purpose or is there another code I could try?

Code used at present:

Sub copytonextsheet()
With Sheets("Sheet2")
n = .Cells(Rows.Count, "A").End(xlUp).Row + 1
.Cells(n, "A").Resize(, 4).Value = _
Cells(1, "A").Resize(, 4).Value
End With
End Sub


Thanks
Nick

Configuration: Windows XP
Opera 9.51

Best answers for « Copy data into next empty cell in new sheet » in :
Excel tips : How to insert date in a cell ShowExcel tips : How to insert date in a cell Below are some tips on how to insert date and time in an excel cell for a specific purpose:- To insert current date, press CTRL ¯+ ;¯ in the chosen cell. To insert current time, press CTRL¯+...
Avoid duplicates in Excel ShowAvoid duplicates in Excel In order to avoid duplication when encoding in a column from an excel sheet: take the conditional format on the first cell under the headings (eg A2) choose the following formula:...
Spreadsheets - Data Entry ShowCell Content A cell of a worksheet can contain a value or be empty. The value of a cell has two essential characteristics: a type, which means the intrinsic type of the data. There are generally three types of values: numeric values, for example...
Worksheet - Cells ShowThe Concept of a Cell A "cell" is the intersection between a line (horizontal) and a column (vertical) on a worksheet. Thus, the name of the line combined with the name of the column gives the cell's coordinates (the term address is sometimes also...
Ask your question Reply

1

shinny, on Oct 24, 2008 11:03:58 am BST
  • +1

Hello Nick,

I am not getiing the result using ur code, I am also facing the same problem, I am unable to copy data from 1 sheet to another sheet which has empty columns, i want to paste the values from one excel to another excel which has first column whihc is empty, please help me ASAP.

Regards,
Shinny dead.

   
Reply to shinny

2

Kioskea_1, on Oct 27, 2008 12:32:24 pm GMT
  • +9

Sub CopyRowsWithNumbersInG()
Dim X As Long
Dim LastRow As Long
Dim Source As Worksheet
Dim Destination As Worksheet
Dim RowsWithNumbers As Range
Set Source = Worksheets("name")
Set Destination = Worksheets("name")
With Source
LastRow = .Cells(.Rows.Count, "E").End(xlUp).Row
For X = 2 To LastRow
If IsNumeric(.Cells(X, "E").Value) And .Cells(X, "E").Value <> "" Then
If RowsWithNumbers Is Nothing Then
Set RowsWithNumbers = .Cells(X, "E")
Else
Set RowsWithNumbers = Union(RowsWithNumbers, .Cells(X, "E"))
End If
End If
Next
If Not RowsWithNumbers Is Nothing Then
RowsWithNumbers.EntireRow.Copy Destination.Range("A4")
End If
End With
MsgBox "Data has been updated !!", vbExclamation + vbInformation, "Company Name"
End Sub

   
Reply to Kioskea_1

6

VBA novice, on Oct 30, 2008 5:21:00 pm GMT
  • +24

What if i only wanted to copy a certain date range from the source data to the destination data? Say 11/1/2006 through 11/30/2006?

   
Reply to VBA novice

8

meek7, on Aug 5, 2009 11:37:04 am BST
  • +4

How do i make it so the VB script runs automaticly every time i change data in the first spreadsheet?

   
Reply to meek7

10

 pete, on Oct 13, 2009 5:02:46 am BST

Say you had 2 text strings (constants) that you wanted to check on sheet1 and if found you wanted the entire row pasted to sheet2 bearing in mind that there are multiple instances of each constant how would one adapt the code to search and return only those specified rows?

   
Reply to pete

3

Kioskea_1, on Oct 27, 2008 12:34:14 pm GMT
  • +1

Replace "E" with your column and the destination and source names and the company name for the message box - this should work for what you need

   
Reply to Kioskea_1

4

Kioskea_1, on Oct 27, 2008 12:35:38 pm GMT
  • +1

P.S "A4" is the row the new data is transfererred to

   
Reply to Kioskea_1

5

dbrown, on Oct 29, 2008 5:23:59 pm GMT
  • +8

Hello,

I have aquestion you may be able to help with based on one of your post.

I have a worksheet in which i copy data that fit a certain criteria onto another sheet. From the original sheet, the one where the original data is copied from, I then go back and do some filtering. After I do the filtering I want copy and that info and put it on the sheet with the previous data I had copied. How do I put that new data into the next available row in the new sheet.

Thanks!

   
Reply to dbrown

7

Gautam, on Mar 24, 2009 5:39:38 am GMT
  • +3

My question is same as dBrowns...

I have a worksheet in which i copy data that fit a certain criteria onto another sheet. From the original sheet, the one where the original data is copied from, I then go back and do some filtering. After I do the filtering I want copy that info and put it on the sheet with the previous data I had copied. How do I put that new data into the next available row in the new sheet.

Please could someone help me with this. If DBrown you have got a reply could you temme.
Thanks!

   
Reply to Gautam

9

meek7, on Aug 5, 2009 5:28:40 pm BST
  • +4

Any way to do this from 2 or more sheets, and consolidate them into one long list on a final sheet?

   
Reply to meek7
Ask your question Reply
They need your help