Help with copying info from one excel to another in one action (Attachments)

Hello and Happy New Year Excel Geniuses!

I have constructed a code that I gathered from some other work I have performed and I am really close to having it do what I want.

Attached are two files (FileToOpen & FileWithVBA).
On FileToOpen there are two tabs with data "Before" and "After"
On FileWithVBA there are the same tabs, but there is no data save for the headers of the columns.

There is a button on FileWithVBA that when clicked, asks the user to open a file. If you select FileToOpen it will run code and then it will ask you again to open a file (click FileToOpen again) and when this is completed, the information from FileToOpen will be transported to FileWithVBA.

What I am trying to accomplish is I want FileWithVBA to complete BOTH codes with only clicking the file one time. I have tried a variety of codes and keep getting errors about already compiling or naming components.
If you save the two files and run the code, you will see what I mean by clicking the FileToOpen more than once.

Couple things:
1.) Can't create code with "FileToOpen" in the code because the name of the file for this code will be different for each person, hence why I need to have the user select a file.
2.) Can't transport the sheet because I need the information copy and pasted, not moved.

if someone can figure out how to make both run without selecting the file twice, I would be super appreciative! Thanks for looking!
Thank you!!!

If you open FileWithVBA you will see that the Before and After tabs are blank.

When you click the button it runs two macros. The first macro takes the data from the file selected (FileToOpen) and copies and pastes the data from sheet to sheet (Before-FileToOpen to Before-FilWithVBA). The second code does the same but for the After tab (After-FileToOpen to After-FileWithVBA). However, the code now requires the user to select the file more than once. If you notice, after you select the button and click FileToOpen twice, the Before and After tabs on FileWithVBA are no longer blank.

I am trying to figure out how to do this without clicking FileToOpen more than once. The file I am using this code I need to do this for 20+ sheets and would like to be able to figure out how to do this without clicking the file 20+ times.

Does this answer your question?

Why dont you just combine them in one sub??? Like I did below... I didnt see this before I posted my question and I think it will help me solve mine as well so thought I would try to help you out.

This will only make you call the file one time and do both???? Remember to delete the Call BeforeToBefore in the main sub...

Please Login or Register  to view this content.

Thanks Corey (and davesexcel)!!

I appreciate the time you both took to help me!
Corey, I was trying to do that but kept getting errors! Yours worked for me! Dunno what I was doing wrong, but THANK YOU!!!