Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 07/06/2011, 11h36   #1
Membre du Club
 
Homme Jérémy B-ACD-AD- IJ
Étudiant
Inscription : avril 2011
Messages : 106
Détails du profil
Informations personnelles :
Nom : Homme Jérémy B-ACD-AD- IJ
Âge : 21
Localisation : France, Alpes Maritimes (Provence Alpes Côte d'Azur)

Informations professionnelles :
Activité : Étudiant

Informations forums :
Inscription : avril 2011
Messages : 106
Points : 52
Points : 52
Par défaut nombre décimal dans résultat requête SQL

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 :
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...
pikameuh est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 07/06/2011, 12h00   #2
Membre Expert
 
Avatar de nico84
 
Homme Nicolas Guimbal
Consultant/développeur ERP
Inscription : mai 2008
Messages : 1 254
Détails du profil
Informations personnelles :
Nom : Homme Nicolas Guimbal
Âge : 49
Localisation : France

Informations professionnelles :
Activité : Consultant/développeur ERP
Secteur : High Tech - Éditeur de logiciels

Informations forums :
Inscription : mai 2008
Messages : 1 254
Points : 1 870
Points : 1 870
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")
nico84 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 07/06/2011, 12h23   #3
Membre du Club
 
Homme Jérémy B-ACD-AD- IJ
Étudiant
Inscription : avril 2011
Messages : 106
Détails du profil
Informations personnelles :
Nom : Homme Jérémy B-ACD-AD- IJ
Âge : 21
Localisation : France, Alpes Maritimes (Provence Alpes Côte d'Azur)

Informations professionnelles :
Activité : Étudiant

Informations forums :
Inscription : avril 2011
Messages : 106
Points : 52
Points : 52
J'ai pas réussi...

J'ai remplacer les données diretement dans la table.
pikameuh est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 20h30.


 
 
 
 
Partenaires

Hébergement Web