Alex
Não entendi, diferente em que sentido?

Diferente no sentido de ter que colocar este código nos 16 checkbox que tenho, se existe alguma outra propriedade do Checkbox que traga 1 ou 0 ao invês de verdadeiro ou falso, pois este retorno será utilizado para formar um gráfico posteriormente.

Abraços Reinaldo! Sempre respondendo nossas dúvidas!

Bem Alex
Pelas propriedades do Checkbox, o retorno e Verdadeiro ou Falso, então creio ser necessario um codigo para cada um , ou sendo o retorno em uma celula, em outra utilizar um "Se" Se(CeluladeRetorno="Verdadeiro";1;0)

Fiz um teste em um botão de comando:

Private Sub CommandButton1_Click()
ActiveCell.Offset(0, 5).Value = IIf(CheckBox1, 1, 0)
End Sub

Fiz um teste em um botão de comando:

Private Sub CommandButton1_Click()
ActiveCell.Offset(0, 5).Value = IIf(CheckBox1, 1, 0)
End Sub

White amigo! Ficou perfect!! Isso mesmo que estava querendo!!

Muito Grato!!