after msgbox go to not answered groupbox (radiobutons) before continu with next macro

Hi there,

I'm new here and not very familiair with VBA.
I've searched on the internet for many days but can't find to solve my problem.

I've an Excel Workbook with several sheets.
A sheet named "Vragenlijst" contains 20 questions. Each question has 4 option buttons (Control Toolbox) in a group.

In the second sheet named "Controlevelden" the values of the 20 aswers are registered in colom B2 to B21.
In B27 i wrote a formula: =COUNT.IF(B2:B21;">0")>=20

After the questions are aswered there will be a summary of textual answers on the sheet named "Rapportage".

I have 1 command button proceeding all the actions neccesary. After pushing the button
a macro takes a picture (with 'camera'-option in Excel) of this summary and places it on a special place on sheet "Vragenlijst"

A MsgBox is giving me a box with "You didn't anwer 1 (or more) questions" when a question has not been answers (option button not chosen). When all the question are answered: "You answered all the question".

The problem is that after "You didn't asnwer 1 (or more) questions" it continues with the next macro in VBA.
I want to go to the not answered question before going further with the VBA command.

The command button has this code:

Please Login or Register  to view this content.

the module (sub) 'checkvragen' has this code:

Please Login or Register  to view this content.

Can anyone help me please?

hi VBAStarter

Please Login or Register  to view this content.

can you attach the workbook?

Hi Pike,

here is the workbook you were asking for.

Greetz,
VBA Starter

have i got the true and false around the wrong way?
try....

Please Login or Register  to view this content.

extra information: in VBA 'ActiveSheet.Pictures.Paste.Select' is highlighted in yellow, so this action won't take place.

Hi
You will need to unprotect the sheet before you run the macro then protect after it has run

Hello Pike,

this method didn't work for me. Only when i selected 'Edit Objects' in sheetprotection, this would work. But then all the other object were unprotected.

I found out on the internet the following code

Please Login or Register  to view this content.

. This works fine for me. I placed it in a module and add it to the commandbutton.

Thanks for all the good ideas!