Format de texbox

[gilles291]

Bonjour,
Etant debutant , je suis confronte a un petit probleme.
j'ai sur un PC une version excel 2002 avec un fichier contenant textbox qui a un format du type:
TextBox1.Value = Format(Text_usfBonCde_Mini, '# ### ##0.00 €')
Lorsque j'utilise ce fichier sur le PC n°2 ayant une version excel 2000, il ne comprend pas ce format.
existe-r-il une macro ou autre fontion pour remédier a ce probleme.

D'avance merci
ET A BIENTOT

 

[Laisse moi rire]

Salut

Avec une petite interrogation, chuis pas chuoure :

Un truc du style (Peu être trop simple, lol):

If Application.Version = '10.0' Then
TextBox1.Value = Format(UserForm1, '# ### ##0.00 €')
Else
TextBox1.Value = Format(UserForm1, 'autre format')
End If

Salut, G'Claire

 

[Laisse moi rire]

re

ou peu être cela :

Select Case Application.Version
Case Is = '8.0': 'TextBox1.Value = 'autre format
Case Is = '9.0': 'TextBox1.Value = 'autre format

Case Is = '10.0': TextBox1.Value = Format(UserForm1, '# ### ##0.00 €')

End Select

Salut, G'Claire

 

[GILLES291]

Salut,
Je te remercie, j'essaie demain et je te dirai si ca fonctionne
A bientot