Consolidate Information of Multiple Worksheets Into a Table

JasonTSG

New Member
Joined
Dec 22, 2015
Messages
1
Hello,

I am a powerlifting coach for numerous gold, silver, and bronze national medalists in the USA, Canada, and Asia. It will help me a tremendous amount if a forum member could find a solution to this problem I am facing.

My Goal

Click a button which copies analytics information from a "microcycle" of training into a consolidated table. There are 52 microcycles of training in a year, so there will be 52 microcycles of training in my document.

My Problem

When I click the button, it copies and pastes the values of ALL microcycles of training. I only would like it to copy and paste the values from the LATEST week of training.

Sub CopyRawData()


For Each cell In Range("WorksheetsToCopy")
Worksheets(cell.Text).Range("Z6:AT6").Copy
Range("NewRawData").PasteSpecial xlPasteValues


Next


EndSub

***Range "WorksheetsToCopy" contains Microcycle 1, Microcycle 2... Microcycle 52.***

Please help!

Jason Tremblay
President of The Strength Guys Inc.
 

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
Back
Top