opa, minha primeira pergunta

então, sou novo em macros...
tenho uma planilha que fiz sobre um jogo e tal.. coisa pessoal minha...

tenho a seguinte formula:

=(SE(F5="sim";20000;10000)/(((SE(600*F2*SE(F3=0;1;1)*SE(F3=1;0,75;1)*SE(F3=2;0,5;1)*SE(F3=3;0,25;1)>2000;2000;600*F2*SE(F3=0;1;1)*SE(F3=1;0,75;1)*SE(F3=2;0,5;1)*SE(F3=3;0,25;1)))*("01:00:00"/((("00:30:00"*2)*((SE(F4=0;100%)+SE(F4=1;80%)+SE(F4=2;60%)+SE(F4=3;40%)))))))-(SE(F3=0;125;0)+SE(F3=1;300;0)+SE(F3=2;450;0)+SE(F3=3;600;0))))/24

eu tava querendo usar listas e botoes para atribuir os numeros em vez das celulas
eu consegui usar botoes para preencher as celulas, mas gostaria que foce mais eficaz, e preenche-se diretamente na formula, que se encontra em "Cells(10,3)"

eu tava usando o macro assim:

Sub N()
Dim NN As String
Dim Acad As String
Dim Bat As String
Dim CF As String

NN = InputBox("pergunta 1", "1ª pergunta")
    Cells(2, 6) = NN

Acad = InputBox("pergunta 2", "2ª pergunta")
    Cells(3, 6) = Acad

Bat = InputBox("Pergunta 3", "3ª Pergunta")
    Cells(4, 6) = Bat

CF = InputBox("Pergunta 4", "4ª pergunta")
    Cells(5, 6) = CF
End Sub

a, e no caso ali, a quarta pergunta é respondida com "sim ou não"
se tive como botar para só ciclar em "sim/não" e ele leva o sim/não para a formula