Hi Johannes,
Application.International(xlDecimalSeparator) returns the local PC decimal seperator according to that PC's settings.
Private Sub Interval_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Application.International(xlDecimalSeparator) = "," Then
UserForm.Interval.Value = Replace(UserForm.Interval.Value, ",", ".")
End If
End Sub
Actually I am probably missing something in your question because we can just use
UserForm.Interval.Value = Replace(UserForm.Interval.Value, ",", ".")
to replace all commas to "." without checking the user settings. However if you need to know user settings and decimal seperator then you can use the International property of Application object as I mentioned above.
Suat