Discussion :

[msteph_2]

Bonjour,

Dans une table de résultats que je génère, je souhaite afficher certaines colonnes sous le format nombre avec séparation au millier.

J'ai essayé avec le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
For i = 1 To 51
    Set prop = t.Fields(22 + i).CreateProperty("Format", dbText, "standard")
    t.Fields(22 + i).Properties.Append prop
Next

Mais ça ne fonctionne pas.
Est-ce que vous auriez une méthode simple à me suggérer svp ?

[bernardmichel]

Bonsoir,

Ne serait-ce pas simplement quelque chose comme ça que tu veux faire ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
    For i = 1 To 51
        MonChamp = Format(t.Fields(22 + i), "Standard")
    Next i

Cordialement

[msteph_2]

J'ai corrigé mon pb, c'était simplement un problème de borne (jusqu'à 50 et non pas jusqu'à 51) ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
For i = 0 To 50
    Set prop = t.Fields(22 + i).CreateProperty("Format", dbText, "standard")
    t.Fields(22 + i).Properties.Append prop
Next

Et là çafocntionne