Alla fine ho trovato una soluzione:
For Each p In Me.Panel2.Controls
If Mid(p.Name, 1, 5) = "Panel" Then
For Each x In p.controls
If Mid(x.Name, 1, 11) = "RadioButton" Then
x.checked = False
else if Mid(x.Name, 1, 8) = "CheckBox" Then
x.checked = False
End If
Next x
If CInt(Mid(p.name, Len(p.name), 1)) Mod 2 = 0 Then
p.visible = False
End If
End If
Next p.

Grazie comunque =)