Botão de opção VBA selecionado
If OptionButton1.Value = True Then Range("D3").Value = 10
VasteMonde
If OptionButton1.Value = True Then Range("D3").Value = 10