0

I am trying to have it copy from Data!A2:Z2 and paste in the 1st empty row on another sheet. However, column A has a formula and I'm looking for the first row where there is an empty cell in B to insert the data. So, if I have data through row 25, I would want it to copy the data and paste starting in cell B26. Of course the next time it runs it would paste in B27. Any help would be appreciated!

gb10
  • 1
  • 1
  • 1
  • 1
    Show us what you have so far, we aren't here to solve your problems from scratch, but to help you debug issues that you've tried to do already. – Adam Aug 14 '14 at 21:19
  • Here is your syntax for copying over data between sheets: `Worksheets("Sheet1").Range("A2:Z2") = Worksheets("Sheet2").Range("A5:Z5")` Read here to figure out how to get the next blank row http://answers.microsoft.com/en-us/office/forum/office_2010-customize/what-does-lastrow-cellsrowscount-qendxluprow-do/6c28164c-66bf-49f2-91ec-f38bb66afcaa , when you get the row number of the next row, concatenate it into the assignment command, something like `Worksheets("Sheet1").Range("A" & myNextRow & ":Z" & myNextRow) = Worksheets("Sheet2")...etc` If you get stuck post a more detailed question? – Acantud Aug 14 '14 at 21:47
  • Duplicate of this question which itself is a duplicate. A basic search would have shown this – brettdj Aug 16 '14 at 05:08

1 Answers1

0

Consider:

Sub gr47fgsdgf()
    Dim n As Long
    n = Sheets("other").Cells(Rows.Count, "B").End(xlUp).Row + 1
    Sheets("Data").Range("A2:Z2").Copy Sheets("other").Range("B" & n)
End Sub
Gary's Student
  • 95,722
  • 10
  • 59
  • 99