Copying values from a filter table to another table with values on the cells.

Chouza

New Member
Joined
Jul 15, 2012
Messages
4
Hi everyone!,
I have not found any post like this, so I will appreciate a lot if you have an answer for this one!.

So I have a table on a Workbook that is filter, how ever I need to add it in another workbook table (This is not filtered), how ever this new table has already values in the cells, so I want to add the information on the second line of the cell.

Workbooks("Table1").Sheets("Data").Activate
Dim PasteData As Range
Set PasteData = Selection

Dim wb2 As Workbook
Set wb2 = ActiveWorkbook
wb.Activate
Range("BK1").EntireColumn.SpecialCells(xlCellTypeVisible).Find(What:="*").Activate
Range(Selection, Selection.End(xlDown)).Select
Dim CopyData As Range
Set CopyData = Selection
wb2.Activate

For i = 1 To CopyData.Rows.Count
Do Until Not PasteData.Offset(Ofset).Rows.Hidden
Ofset = Ofset + 1
Loop
CopyData.Rows(i).Copy Destination:=PasteData.Offset(Ofset)
Ofset = Ofset + 1
Next i


But it just paste the information as is from the first table and remove that initial information from the cells, I mean, with all the rows, and I just need to copy the ones that are visible.
I have tried a lot of options and I know that this is super basic but I very newbie for this lol.

Hope that anyone have a solution for this. I will highly appreciate.
Thanks!.
 

Some videos you may like

Excel Facts

Using Function Arguments with nested formulas
If writing INDEX in Func. Arguments, type MATCH(. Use the mouse to click inside MATCH in the formula bar. Dialog switches to MATCH.

Watch MrExcel Video

Forum statistics

Threads
1,128,135
Messages
5,628,905
Members
416,352
Latest member
Lunox01

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top