Hi

I have a Workbook that contains a number of sheets each with info on a
company. When additions are made to any of the company sheets there is
going to be a button that when clicked goes to the Summary sheet and
deletes any information in there for that particular company and then
Copies the info from the Company Sheet on to the Suymmary table.

The first part I believe i have done, using vba AutoFilter and filtering
by the sheet name and deleting all visible rows.

The number of rows will be different each time it is run.

I need to be able to:

1. Highlight cells within the table on Sheet Two (title of which is a
Company Name), the headings of which are:

Planned Date - Owner - Description - Outcome - Completed (Y/N)

What is the best way to ascertain how many rows are in this table and to
highlight them ready for copying?

2. Copy

3. Move to Named cell ("SummaryTable") on Summary sheet within the same
workbook.

Headings Sheet 1 (Summary):

Planned Date - Owner - Organisation Name - Description - Outcome

As you can see the headings on Sheet 1 are slightly different, the
organisation name is the name of the worksheet where the info is copied
from.

I have used txtCompName = ActiveSheet.Name to save the company name, but
I'm not sure how to paste this info into the summary table. Once the
info is copied from Sheet Two, I guess I need to delete the info in the
fifth column and move the Description and Outcome along one column to
the right and then insert the txtCompName in to Col;umn 3 for each new row.

Apologies if any of this is unclear.

Thanks for any assistance.

Andy