Das CommandButton-Steuerelement sieht keine Eigenschaft vor, die Schriftfarbe festzulegen. Als Alternative können Sie eine CheckBox verwenden. Wenn Sie die Style-Eigenschaft auf 1-Grafisch festlegen, nimmt diese das Aussehen eines CommandButton an und stellt den Text in der über die ForeColor-Eigenschaft eingestellte Farbe dar.

Damit sich die CheckBox auch wie ein CommandButton verhält, müssen Sie im Click-Ereignis noch den Status zurücksetzen. Beachten Sie, dass das Click-Ereignis zweimal ausgeführt wird und Sie ihre Aktion innerhalb der Bedingungsprüfung ausführen:

Private Sub Check1_Click()
  If Check1.Value = vbChecked Then
    Check1.Value = vbUnchecked
    Debug.Print "Action!"
  End If
End Sub

Sollten Sie für Ihre Anwendung die mit Windows XP eingeführten visuellen Stile aktiviert haben, wird eine solche CheckBox dennoch im klassischen Windows-Stil gezeichnet und hebt sich damit vom Standard CommandButton ab.