Dear All,

I frequently carry out analyses of Satisfaction Survey Data of very many people. I have a Survey Questionnaire with about 30 questions on my computer. I get each individual to complete the survey data by clicking/choosing I agree, strongly agree, disagree, etc. after which I save the document in the persons name in a folder named ‘Completed Questionnaire’.

I get another person to do the same thing after which I also save it in the person’s name.

When all my respondents have completed the questionnaire – say about 50 respondents, I then I print out each questionnaire and enter/group the responses into a Summary Excel sheet, from which I use the COUNT/COUNTA functions to do the analysis.

I have no problem doing the final survey analysis once the individual questionnaires have been manually entered onto the summary Excel sheet and grouped. Unfortunately, keying in the responses from each questionnaire manually into the Summary Excel Sheet takes a great amount of time, hence I need help with it.

I need a VBA code that will be able to transfer responses from each completed questionnaire onto the Summary Excel sheet, to save me the enormous time required to enter, manually, the individual responses from each questionnaire onto the Summary Excel sheet.

What I am hoping to achieve is this: Once an individual completes a questionnaire sheet which is on my computer), and I click a SAVE button, the vba code should be able to pick the responses from that questionnaire and transfer them to the Summary Excel Sheet in the following format, e.g.:

Name/ID of respondent Q1 Q2 Q3 Q4 (etc. to Q30)
XYZ Agree Disagree Strongly Agree Disagree


After transferring the responses from each questionnaire to the Summary Sheet in the above format, the code should SAVE the completed questionnaire in a designated folder named e.g. ‘Summarized’.

I will then do the required Analysis from the Summary Excel sheet. I believe I should be able to carry out the final analysis of the Summary Excel Sheet, using the Excel COUNT/COUNTA function.

Thanks all for your kind help.

Newqueen