Help with macro


So, let me try to explain my problem.

I have a Group (28 to be exact) of Rectangle Shapes  that are labled "cb1s", "cb1n", cb2s", cb2n".
If the Shape has a fill the value is true and if not it's false.

Now, I have a form with CheckBox that have the same names.

Without doing a "If Then Else" for each Shape and CheckBox, is there a way to do it.

I'm attaching a sample Doc from CorelDRAW 2019 with the VBA form Embedded.

Any help would higly apreciated.