Generate separate workbooks from main Workbook

[robbie58]

Hi there,
I have a spreadsheet with work sites located in Irish counties in a spreadsheet. The county that the site is in is located in column A, and there can be anything from 1 to 100 sites per county. I need to filter out all the sites in one county, copy all the data (column A to Column FF or something), paste this as transposed data in a new WB, and complete this for all the other counties.
There are currently approximately 200 sites. I have a macro, but it is going to be very long winded as I don't know how to get it to run auutomatically for each county, so I am just reproducing the action for 20 odd counties. Can anyone make this shorter?
Thanks in advance