Copy & Paste Multiple sections as values

I have this VBA code that works, however for my needs require the pasting to be done in Values.

• Calculations are done on a sheet named Deductions, and linked directly to data sheet
• data sheet is where the user manually keys the other information from multiple reports
• The result is the user can run this macro and paste the weekly results on the appropriate quarter tab in the proper week
• The YTD tab pulls data from each weekly section on the 4 quarter tabs

So currently the paste is doing "all", so for the items calculation on the "Deductions" tab, those links appear, come next week, the user will use this again, and that data will be incorrect. So I need help with 2 things. And thank you so very much for your help!!

• Changing the paste from "all" to "values"
• After the macro is complete, the range on the "data" tab is still selected. A cell w/o data (such as B8) should be selected. I attempted to fix this unsuccessfully

Please Login or Register  to view this content.

Please Login or Register  to view this content.

AlphaFrog,

It works great! I had simply previously added ".PasteSpecial xlPasteValues" to the row beginning "SelAreas(i).", obviously there were errors. I di have one question. After the macro is complete, it went back to data tab and cell B8 as required. However, as I had selected the Qtr 4 tab, the final area pasted (which is the data in column W for 3 rows) is still selected. As this was just pasted, I would like to be able to "unselect" this data. You simply never know if the end user will accidently delete the data in the selected cells. If we can "deselect" that is my first choice. If however a specific cell would need to be selected, W5 could be that cell. Can you help with that?

Please Login or Register  to view this content.