Run several sheet specific VBA Codes from a single Macro

Hi.
I am a beginner when it comes to VBA. I have tried to find the answer to my problem on several forumtreads, but it seems like I don't really understand the advance solutions.
My macro simply copies values from a Yahoo finance table in Sheet1, to Sheet2, post date and make another row.
What I want to do is someting like this, but correctly written.

Please Login or Register  to view this content.

Below is a small sample of my macro.

Please Login or Register  to view this content.

I hope it wont be to much problems for you guys, but I have been trying to fix this for two days now and aint coming nowhere.
Please be very simple in your explanations, else I won't understand

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here