Label Zahlenwert darstellen

Private Sub OptionButton1_Click()
Sheets("Test").Range("C1") = Sheets("Test").Range("C1") + 1
Me.Label2 = Format(Sheets("Test").Range("C1"), "#,###")
End Sub

Private Sub UserForm_Activate()
Me.Label2 = Format(Sheets("Test").Range("C1"), "#,###")
End Sub

Wenn die UF geöffnet wird, wird die Zahl Richtig dargestellt, wenn
ich aber den OptionButton betätige wird die Zahl vom Label2
wieder normal dargestellt also 1500 so ist Richtig: 1.500
Wieso klappt das nicht ?
mfg walli