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 19/07/2011, 11h05   #1
Futur Membre du Club
 
François Bourdon
Inscription : avril 2008
Messages : 50
Détails du profil
Informations personnelles :
Nom : François Bourdon
Âge : 61

Informations forums :
Inscription : avril 2008
Messages : 50
Points : 16
Points : 16
Par défaut Erreur 3070 sur Findfirst

Bonjour à tous !

J'ai un fichier Type de produits qui va chercher dans l'historique du stock les enregistrements correspondants ...par la méthode Findfirst...
Code :
1
2
3
4
5
6
7
8
9
 
Sub calcul()
 
Set rst = CurrentDb.OpenRecordset("HistoriqueStockRequête", dbOpenDynaset)
 
critere2 = rst1("Produit")
 
With rst
 rst.FindFirst critere = critere2
Le programme me marque erreur 3070 pour la ligne rst.FindFirst critere = critere2 ... J'ai essayé les guillemets , les crochets , les parenthèses....Rien à faire...

Que me conseillez vous ?

Grand merci par avance !

Fbourdon
Genève
fbourdon est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 19/07/2011, 14h11   #2
Membre régulier
 
Homme Michaël
Développeur .NET
Inscription : avril 2008
Messages : 80
Détails du profil
Informations personnelles :
Nom : Homme Michaël
Âge : 30
Localisation : Belgique

Informations professionnelles :
Activité : Développeur .NET
Secteur : Transports

Informations forums :
Inscription : avril 2008
Messages : 80
Points : 84
Points : 84
Bonjour,

l'argument à passer à la méthode FindFirst doit être un string.

Et donc, pour peu que critere est bien une colonne de ta table HistoriqueStockRequête et que c'est un champs texte

Code :
 rst.FindFirst "critere = '" & critere2 & "'"
mkl238 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 13h24.


 
 
 
 
Partenaires

Hébergement Web