Copy entire row to a different sheet's first emtpy row if a cell meets a criteria

[Blaise930]

Hello Guys,

I spent all afternoon surfing the web trying to figure out how I can solve this. You are my final hope

A friend of mine asked me to help her build a database from paper-based questionaires filled out by potential future customers.

On the sheet 'Kerdoiv' you'll find this questionaire. You can fill out the blue cells (name, address, email, etc), then there are checkboxes which area the customer is interested in.

Based on their choices the information is automatically collected on Sheet 'Temporary.table'. If all the checkboxes are checked on Sheet 'Kerdoiv', Rows 3 to 28 on Sheet 'Temporary.table' are filled. If not all the checkbox are checked, there are empty rows.

And here comes my problem.

I would like to copy all the filled row (and only the filled ones) to the next empty row of Sheet 'Database'. This should be processed by pressing the 'Adding data to database' command button on Sheet 'Kerdoiv'. I tried to search for a VBA code for a formula like an If statement: If A3 on Sheet 'Temporary.table' is equal to the name filed on Sheet 'Kerdoiv' (C4), then copy the entire row to the first available row in Sheet 'Database' ... but I didn't succeed.

Hopefully I could make it clear.

I'm enclosing the file, it will help more.

Thank you for anyone's help in advance.
Balazs