Option button

Hola,
tengo el siguiente problema, tengo dos option button en un frame (optionbutton1= si optionbutton2=no) por consecuencia si selecciono cualquiera de los dos quisiera que el setfocus pasara al optionbutton3 y asi sucesivamente. Envio el código que utilizo.
if optionbutton3 = true then
activecell.offset(0,2) = "si"
else
activecell.offset(0,2) = "no"
end if
luego tengo una validación en otro optionbutton pero no consigo marcar automaticamente el optionbutton3 envio código.
private sub optionbutton9_click()
if optionbutton4 = true then
msgbox "tienes marcado el boton 4" & vbcrlf & "verificalo", vbquestion, "dato ambiguo"
optionbutton4 = empty
optionbutton3= true end if
end sub
saludos