Pull Multiple Column Data from One Sheet to Another - Repost of Question

[Katterman]

Hello Everyone

I am re-posting this question as a previous helper although Very Helpful and appreciated, was not able
to provide the final solution.
The original post and suggestions are HERE for reference.
It was so close just not all the way there (Thank You Again Ben for your valued efforts)

Here is My Question / Issue

I've searched many similar threads and sites for help on this but even though some similar questions have been posted and answers given, i can't seem to find a scenario that works best or that my limited <acronym title="visual basic for applications" style="border-width: 0px 0px 1px; border-bottom-style: dotted; border-bottom-color: rgb(0, 0, 0); cursor: help; color: rgb(51, 51, 51); background-color: rgb(250, 250, 250);">VBA</acronym> experience has been able to adapt. I Have tried the record macro approach as well but since not copying and pasting Column to Column (see below) it fails. I always do my best to research before posting to try and avoid wasting peoples time if the answer is already here.

I have a sheet (CleanIt) that contains cleaned up data (done daily so the "end Rows" would not always be the same) that i want to pull the data from 4 columns and paste into different columns (starting in row 2 to avoid header overwrites) on a different sheet (For this example the sheet is called "Work In Progress" but each day would be a different sheet due to data is gathered Daily and the Last Rows would always be different on a daily basis)



[TABLE="class: cms_table_grid, width: 900, align: left"]
<tbody>[TR]
[TD]Sheets("CleanIt")[/TD]
[TD][/TD]
[TD]Sheets("Work In Progress")[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD]*** This is a Table (Table3) That Ranges J1-> AF5000 ***[/TD]
[/TR]
[TR]
[TD]Column "A" up to Last Row[/TD]
[TD]Copy to[/TD]
[TD]Column "AD" Staring in Row 2 (To Leave headers untouched)[/TD]
[/TR]
[TR]
[TD]Column "B" up to Last Row[/TD]
[TD]Copy to[/TD]
[TD]Column "M" Staring in Row 2 (To Leave headers untouched)[/TD]
[/TR]
[TR]
[TD]Column "C" up to Last Row[/TD]
[TD]Copy to[/TD]
[TD]Column "J" Staring in Row 2 (To Leave headers untouched)[/TD]
[/TR]
[TR]
[TD]Column "D" up to Last Row Value of A, B or C[/TD]
[TD]Copy to[/TD]
[TD]Column "N" Staring in Row 2 (To Leave headers untouched)[/TD]
[/TR]
</tbody>[/TABLE]


** Note, The "Last rows" of Data would all be the same for Columns A, B and C with No Blank Cells but Column D would have some blank cells within the column (and want to be kept) and would "technically" end at the same Last row as the other columns albeit there many not be data in the last row(s) of column (D).

Just to clarify how this workbook will function. There is a new workbook for each Month.
Each Monthly workbook will have 30 or 31 "Sheets" (Each Labeled as a Date of that month. I.E. Sept 1, Sept 2 etc)
There will also be the single "CleanIt" sheet that data from another CSV file (Different Each Day) is pasted in and "cleaned up" to remove non essential stuff. Back on the sheet for that particular date (Say Sept 1), i want to pull the data from the columns noted above in "CleanIt" and paste in in that particular dates sheet (Sept 1). The Next day (Sept 2), the "CleanIt" sheet will be cleared and new data put in to eventually be pulled into the sheet for that new date (Sept 2).

Thanks in Advance for any and all replies.
Your teachings are most Valued

Scott

 

[Katterman]

All Resolved Now.

The Final Thread is HERE.

Thanks Ben (bschwartz) and Norie for all their time and assistance.

Scott