Hola... como bien dices, es mejor utilizar VBA, es mas controlable, creas un cuadro de opciones, con tres option_button, a cada uno le das un valor distinto, y en el procedimiento de evento, después de actualizar, del cuadro de opciones pones el código que dices, sería algo así:
 
Sub CuadroOpciones_Uno_AfterUpdate() 
     If Me.CuadroOpciones_Uno = 1 then
           me.campoactualizar = (x * n)/ n
     elseIf Me.CuadroOpciones_Uno = 2 Then
           me.campoactualizar = (y * n)/ n
     else
           me.campoactualizar = (z * n)/ n
     End If 
End Sub 
O algo asi, ya depende de como lo quieras exactamente 
Espero que te sirva de ayuda, un saludo  
