Copy Data from page 1 to new sheet

[VBA Help]

Hello,

I'm very new to using macros and am having trouble finding a code that works how I want it to. My column G is account numbers and I want to create a code that will look through column G and copy each account and all the rows to a new sheet and label it by that account. So the accounts are are in order but there are blank rows between between some of the columns. For example account A has account information separated by different employees names and I want to be able to copy all Account A information on to a new sheet, labeled A and to keep all of the formatting that I have on my main page including the blank rows. I have come across some VBA codes that can create new sheets that are labeled correctly but it is taking all of the data from my main sheet and copying it to each new sheet. Any help would be appreciated.

Thank you

 

[VBE313]

Please post a screenshot of example data.

 

[VBA Help]

This is how the data should look when I run my report and have it formatted the way I want.
.

And this is how I want it to look for Sheet A

And for Sheet B

This is just a small sample of what I would like the VBA code to do. But there are normally 100's of accounts that I would have to sort through and separate all that data. Thank you for your help.