Microsoft 365 Format grand Nombre de Textbox

[eric72]

Bonjour à tous,

J'ai un Userform avec beaucoup de Textbox, j'aimerais qu'à la saisie et au chargement il y ait un séparateur de milliers, il y a bien la méthode :

Private Sub TextBox156_AfterUpdate()
TextBox156.Text = Format(TextBox156.Text, "#,##0")
End Sub

Mais vu le nombre de textbox, il y a peut-être mieux à faire!!!
Merci beaucoup pour votre aide...
Eric

 

[Dudu2]

Exact. Seulement couleurs et bordures grises et blanches. 30s pour la feuille.

Trop fort ! J'aurais mis 30mn