Code VBA

[marcelio]

Bonjour le Forum,
Je cherche mais je n'arrive pas à trouver mon problème qui je pense doit être simple.
Je voudrais qu'à l'ouverture de mon USF la TextBox69 soit écrite de la facon suivante.
" Soit une moyenne de 1 464 Km parcourus cette semaine "
1464 est en cellule EP12
Je vous joint un petit fichier.
Merci d'avance.
Marcelio

 

[M12]

Bonjour,

A tester

 

[vgendron]

Hello
avec ce code

Private Sub TextBox69_Change()
Application.EnableEvents = False
TextBox69 = Format(TextBox69, """Soit une moyenne de""  # ##0 Km parcourus cette semaine ")
Application.EnableEvents = True
End Sub

 

[marcelio]

Bonjour M12,
Super ton code, mais j'ai oublier de dire que l'USF sert pour plusieurs feuilles.
Merci
Marcelio

 

[marcelio]

Merci messieurs,
Je viens de voir le code de vgendron, merci pour ce code cela fonctionne pour toutes les feuilles.
Bonne fin d'après midi à M12, vgendron et le Forum.
Et encore merci à tous les 2
Marcelio