Speedsurfer
Gebruiker
- Lid geworden
- 3 aug 2019
- Berichten
- 60
Waar in mijn VBA Formulier code bestand moet ik de code plaatsen om direct de valuta zichtbaar te krijgen bij de start van de "Verkooplijst".?
De code die ik gebruik is:
Dim mycontrol As Object
For Each mycontrol In Klantenlijst.Controls
If TypeName(mycontrol) = "TextBox" Then
If IsNumeric(mycontrol.Value) Then
mycontrol.Value = Format(mycontrol.Value, "€ #,##0.00")
End If
End If
Next mycontrol
Staat in Formulier Verkooplijst
Als ik hem nu opstart staat er geen valuta, maar als ik in de zoekbalk iets invul verschijnt hij wel.
Eigenlijk te laat.
Wie weet een oplossing
Grtz. Speedsurfer
De code die ik gebruik is:
Dim mycontrol As Object
For Each mycontrol In Klantenlijst.Controls
If TypeName(mycontrol) = "TextBox" Then
If IsNumeric(mycontrol.Value) Then
mycontrol.Value = Format(mycontrol.Value, "€ #,##0.00")
End If
End If
Next mycontrol
Staat in Formulier Verkooplijst
Als ik hem nu opstart staat er geen valuta, maar als ik in de zoekbalk iets invul verschijnt hij wel.
Eigenlijk te laat.
Wie weet een oplossing
Grtz. Speedsurfer