Bedragen invoeren in UserForm

[hondel]

Ik zit me toch een partij te *****n!
Ik wil een UserForm gebruiken om een aantal bedragen in te voeren.
Dat is op zich zelf niet zo moeilijk maar hoe krijg ik het voor elkaar dat er geen verkeerde dingen ingevoerd worden?

Ik heb mijn probeersel erbij gedaan.
Ik hoop dat Jullie het professioneler op kunnen lossen want dat van mij werkt niet echt.

Jeroen

[A4A]

Als ik het goed begrijp bedoel je met "er geen verkeerde dingen ingevoerd worden" dat als je bijv. 1.1 zou intikken in een veld dat hij 11 er neer zet. Dit kan je vrij makkelijk doen door onderstaande code

Private Sub txtVeld_Change()
a = txtVeld.Value

    If Not IsEmpty(a) Then

        a = VBA.Replace(a, ".", ",")
        txtVeld.Value = a

    End If
End Sub

Hier gaat hij kijken als er wat wordt ingetikt of er een . (punt) staat, staat deze er dan wordt deze automatisch omgezet naar een , (komma). Als het veld leeg is dan gaat hij niet zoeken naar een . (punt)

Gr. René

[hondel]

Geweldig!

Dit is net wat ik moest hebben.
Ik had het zelf al wat in elkaar geknutseld waarbij Excel teken voor teken na kijkt, maar dit is veeeeeeeeeeeeeeel beter.
Bedankt!

Jeroen