Discussion :

[pikameuh]

Bonjour à tous,

Je developpe un formulaire permet à l'utilisateur de filtrer une base.
La clause Select affiche 8résultats (Il y a 8 colonnes).
Une de ces colonnes correspond à une longueur et est au format :
ab,cd0000000000 (ex : 12,140000000000).

J'aimerais n'afficher que j'usqu'à 2 décimales, mais la valeur est au format texte.

Voici mon code :

Code :

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

1
2
3
4
5
6
7
8
9
  ' Compter les longueurs pose et depose
    For i = 0 To totLigne - 1
        'Convertion longueur
        pos = InStr(Me.ListeResultat.Column(5, i), ".")
        If (pos <> 0) Then
            MsgBox (Left(Me.ListeResultat.Column(5, i), pos + 2))
            strTemp = Left(Me.ListeResultat.Column(5, i), pos + 2)
            Me.ListeResultat.Column(5, i) = strTemp
        End If

Me.ListeResultat.Column(5, i) = strTemp Cette ligne génere l'erreur : erreur 424 : objet requis.

je ne comprends pas...

[nico84]

Bonjour,

Je pense que Me.ListeResultat ne peut pas être valorisé par vba car lié à une requête ou équivalent...

Une solution peut être de convertir en numérique et utiliser un format

par exemple format(1*MaChaine, "0.00")

[pikameuh]

J'ai pas réussi...

J'ai remplacer les données diretement dans la table.