H
Hervé
Guest
Bonsoir tout le monde
je travaille sur un userform avec une quarantaine de textbox.
Je recherche une combine pour lors de la validation des données, vérifier en une seule boucle si des points on été saisie en lieu et place de virgule dans les controles (textbox ou combobox).
j'avais pensé à ceci (merci de pas vous marrer) :
dim ctrl as object
For Each ctrl In UserForm3.Controls
If IsNumeric(ctrl) = True Then
ctrl = Application.WorksheetFunction.Substitute(ctrl, ".", ",")
End If
Next ctrl
mais ceci ne marche pas (et cours encore moins).
Si vous pouviez me donner une solution globale pour éviter la saisie du point au lieu de la virgule ou me renvoyer vers un lien.
D'avance je vous en remercie
Salut
Hervé
je travaille sur un userform avec une quarantaine de textbox.
Je recherche une combine pour lors de la validation des données, vérifier en une seule boucle si des points on été saisie en lieu et place de virgule dans les controles (textbox ou combobox).
j'avais pensé à ceci (merci de pas vous marrer) :
dim ctrl as object
For Each ctrl In UserForm3.Controls
If IsNumeric(ctrl) = True Then
ctrl = Application.WorksheetFunction.Substitute(ctrl, ".", ",")
End If
Next ctrl
mais ceci ne marche pas (et cours encore moins).
Si vous pouviez me donner une solution globale pour éviter la saisie du point au lieu de la virgule ou me renvoyer vers un lien.
D'avance je vous en remercie
Salut
Hervé