Copying Values from ranges to tables

[anbhavane]

I have created a table and want to copy the values from range to table cells(row), but the values are getting copied to cells(rows below table). request you to kindly help..
I am using following code.

ThisWorkbook.Worksheets("Data").Range("AC" & Rows.Count).End(xlUp).Offset(1).Resize(, 324).Value = ThisWorkbook.Worksheets("Data").Range("AC3:MN3").Value

Table contains range AC5:MN5 where I want the copied values to get stored. Table ends at AC130:MN130. All the columns and rows are empty. The value gets stored in row below end of table. range AC131:MN131.

Thanks.

 

[mumps]

Try:

Sub test()
    Dim LastRow As Long
    LastRow = Sheets("Data").Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
    Sheets("Data").Range("AC" & LastRow + 1).Resize(, 324).Value = Sheets("Data").Range("AC3:MN3").Value
End Sub

 

[anbhavane]

Try:

Sub test()
    Dim LastRow As Long
    LastRow = Sheets("Data").Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
    Sheets("Data").Range("AC" & LastRow + 1).Resize(, 324).Value = Sheets("Data").Range("AC3:MN3").Value
End Sub

Not working.. it copies values to 145th row ie. 15 rows down..

 

[mumps]

Do you have any formulae or data validation lists in your sheet?

 

[anbhavane]

Do you have any formulae or data validation lists in your sheet?

Yes there are formulas and data validation lists on the sheet..

 

[anbhavane]

I have created a table and want to copy the values from range to table cells(row), but the values are getting copied to cells(rows below table). request you to kindly help..
I am using following code.

ThisWorkbook.Worksheets("Data").Range("AC" & Rows.Count).End(xlUp).Offset(1).Resize(, 324).Value = ThisWorkbook.Worksheets("Data").Range("AC3:MN3").Value

Table contains range AC5:MN5 where I want the copied values to get stored. Table ends at AC130:MN130. All the columns and rows are empty. The value gets stored in row below end of table. range AC131:MN131.

Thanks.

This works well when the table is converted to range.

 

[mumps]

Glad it worked out.

 

[anbhavane]

Glad it worked out.

Your shared code didnt work the way I wanted.. The code I was using was working earlier without converting range to table. The code I was using is not copying values if I convert range to table.

 

[mumps]

It would be easier to help if you could use the XL2BB add-in (icon in the menu) to attach a screenshot (not a picture) of your sheet. Alternately, you could upload a copy of your file to a free site such as www.box.com or www.dropbox.com. Once you do that, mark it for 'Sharing' and you will be given a link to the file that you can post here. Explain in detail what you want to do referring to specific cells, rows, columns and sheets using a few examples from your data (de-sensitized if necessary).