Na bei Textbox 1 anstelle von CDbl(...)
Kannst auch Fix nehmen. Schau mal hier: https://learn.microsoft.com/de-de/office/vba/language/reference/user-interface-help/int-fix-functions
Mr. K.