Cambiar apariencia de un botton en excel al apretarlo

Pregunta: ¿Qué tipo de letra y que color quieres colocar? ... ¿Quieres alternar entre ellos? Necesito que seas más específico.

Prueba con este código incrustado en el botón y me avisas como te va. Saludos
Private Sub CommandButton1_Click()
If CommandButton1.BackColor = &H8000000F Then
CommandButton1.BackColor = &H8000000D
Else
    CommandButton1.BackColor = &H8000000F
End If
End Sub

Ahora sí, había olvidado el tema de las fuentes
Private Sub CommandButton1_Click()
If CommandButton1.BackColor = &H8000000F Then
CommandButton1.BackColor = &H8000000D
CommandButton1.Font = "comic sans ms"
CommandButton1.Font.Bold = True
Else
    CommandButton1.BackColor = &H8000000F
    CommandButton1.Font = "calibri"
    CommandButton1.Font.Bold = False
End If
End Sub

Necesito que el botón quede rojo y con negrita