Recherche sur tables liées (base fractionnée)
Quelle est la syntaxe de la méthode FindFirst pour rechercher dans la table
liée les enregistrements ayant la valeur d'un champ dont on dispose (issu de
la lecture d'une autre table) dans une fonction VBA
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonjour jeanne.
si je me souviens bien, tu ne peux pas placer un findfirst dans le critère d'un autre findfirst. Il faut passer par une variable. tu fais un 1er findfirst avec ses propres critères et tu places le résultat dans une variable de type adequat. tu fais un 2e findfirst sur ta table liée avec pour critère la variable. Dim Var As Long Dim Rs As Object Set Rs = Forms!formulaire4.Recordset.Clone Rs.FindFirst "[Numéro] = " & Nz(Me![Modifiable1], 0) Var = Rs!Numéro Set Rs = Nothing
Set Rs = Me.Recordset.Clone Rs.FindFirst "[Numéro] = " & Var If Not Rs.EOF Then Me.Bookmark = Rs.Bookmark Set Rs = Nothing
ai-je bien compris la question ? -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeanne JAMBOU" a écrit dans le message de news: 426684ad$0$840$
Bonjour
Recherche sur tables liées (base fractionnée) Quelle est la syntaxe de la méthode FindFirst pour rechercher dans la table liée les enregistrements ayant la valeur d'un champ dont on dispose (issu de la lecture d'une autre table) dans une fonction VBA
Merci de votre réponse Jeanne
Bonjour jeanne.
si je me souviens bien, tu ne peux pas placer un findfirst dans le critère
d'un autre findfirst. Il faut passer par une variable.
tu fais un 1er findfirst avec ses propres critères et tu places le résultat
dans une variable de type adequat.
tu fais un 2e findfirst sur ta table liée avec pour critère la variable.
Dim Var As Long
Dim Rs As Object
Set Rs = Forms!formulaire4.Recordset.Clone
Rs.FindFirst "[Numéro] = " & Nz(Me![Modifiable1], 0)
Var = Rs!Numéro
Set Rs = Nothing
Set Rs = Me.Recordset.Clone
Rs.FindFirst "[Numéro] = " & Var
If Not Rs.EOF Then Me.Bookmark = Rs.Bookmark
Set Rs = Nothing
ai-je bien compris la question ?
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeanne JAMBOU" <jeanne.jambou@wanadoo.fr> a écrit dans le message de news:
426684ad$0$840$8fcfb975@news.wanadoo.fr...
Bonjour
Recherche sur tables liées (base fractionnée)
Quelle est la syntaxe de la méthode FindFirst pour rechercher dans la
table liée les enregistrements ayant la valeur d'un champ dont on dispose
(issu de la lecture d'une autre table) dans une fonction VBA
si je me souviens bien, tu ne peux pas placer un findfirst dans le critère d'un autre findfirst. Il faut passer par une variable. tu fais un 1er findfirst avec ses propres critères et tu places le résultat dans une variable de type adequat. tu fais un 2e findfirst sur ta table liée avec pour critère la variable. Dim Var As Long Dim Rs As Object Set Rs = Forms!formulaire4.Recordset.Clone Rs.FindFirst "[Numéro] = " & Nz(Me![Modifiable1], 0) Var = Rs!Numéro Set Rs = Nothing
Set Rs = Me.Recordset.Clone Rs.FindFirst "[Numéro] = " & Var If Not Rs.EOF Then Me.Bookmark = Rs.Bookmark Set Rs = Nothing
ai-je bien compris la question ? -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeanne JAMBOU" a écrit dans le message de news: 426684ad$0$840$
Bonjour
Recherche sur tables liées (base fractionnée) Quelle est la syntaxe de la méthode FindFirst pour rechercher dans la table liée les enregistrements ayant la valeur d'un champ dont on dispose (issu de la lecture d'une autre table) dans une fonction VBA
Merci de votre réponse Jeanne
Jeanne JAMBOU
Raymond bonsoir Je prend connaissance de ta réponse à l'instant, il me semble que tu as bien compris, maintenant à mon tour d'exploiter de réponse mais pas avant demain Merci encore de ton aide Jeanne "Raymond [mvp]" a écrit dans le message de news: uRIq%
Bonjour jeanne.
si je me souviens bien, tu ne peux pas placer un findfirst dans le critère d'un autre findfirst. Il faut passer par une variable. tu fais un 1er findfirst avec ses propres critères et tu places le résultat dans une variable de type adequat. tu fais un 2e findfirst sur ta table liée avec pour critère la variable. Dim Var As Long Dim Rs As Object Set Rs = Forms!formulaire4.Recordset.Clone Rs.FindFirst "[Numéro] = " & Nz(Me![Modifiable1], 0) Var = Rs!Numéro Set Rs = Nothing
Set Rs = Me.Recordset.Clone Rs.FindFirst "[Numéro] = " & Var If Not Rs.EOF Then Me.Bookmark = Rs.Bookmark Set Rs = Nothing
ai-je bien compris la question ? -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeanne JAMBOU" a écrit dans le message de news: 426684ad$0$840$
Bonjour
Recherche sur tables liées (base fractionnée) Quelle est la syntaxe de la méthode FindFirst pour rechercher dans la table liée les enregistrements ayant la valeur d'un champ dont on dispose (issu de la lecture d'une autre table) dans une fonction VBA
Merci de votre réponse Jeanne
Raymond bonsoir
Je prend connaissance de ta réponse à l'instant, il me semble que tu as bien
compris, maintenant à mon tour d'exploiter de réponse mais pas avant demain
Merci encore de ton aide
Jeanne
"Raymond [mvp]" <XYZ.officesystem.access@free.fr> a écrit dans le message de
news: uRIq%23IdRFHA.3944@TK2MSFTNGP10.phx.gbl...
Bonjour jeanne.
si je me souviens bien, tu ne peux pas placer un findfirst dans le critère
d'un autre findfirst. Il faut passer par une variable.
tu fais un 1er findfirst avec ses propres critères et tu places le
résultat dans une variable de type adequat.
tu fais un 2e findfirst sur ta table liée avec pour critère la variable.
Dim Var As Long
Dim Rs As Object
Set Rs = Forms!formulaire4.Recordset.Clone
Rs.FindFirst "[Numéro] = " & Nz(Me![Modifiable1], 0)
Var = Rs!Numéro
Set Rs = Nothing
Set Rs = Me.Recordset.Clone
Rs.FindFirst "[Numéro] = " & Var
If Not Rs.EOF Then Me.Bookmark = Rs.Bookmark
Set Rs = Nothing
ai-je bien compris la question ?
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeanne JAMBOU" <jeanne.jambou@wanadoo.fr> a écrit dans le message de
news: 426684ad$0$840$8fcfb975@news.wanadoo.fr...
Bonjour
Recherche sur tables liées (base fractionnée)
Quelle est la syntaxe de la méthode FindFirst pour rechercher dans la
table liée les enregistrements ayant la valeur d'un champ dont on dispose
(issu de la lecture d'une autre table) dans une fonction VBA
Raymond bonsoir Je prend connaissance de ta réponse à l'instant, il me semble que tu as bien compris, maintenant à mon tour d'exploiter de réponse mais pas avant demain Merci encore de ton aide Jeanne "Raymond [mvp]" a écrit dans le message de news: uRIq%
Bonjour jeanne.
si je me souviens bien, tu ne peux pas placer un findfirst dans le critère d'un autre findfirst. Il faut passer par une variable. tu fais un 1er findfirst avec ses propres critères et tu places le résultat dans une variable de type adequat. tu fais un 2e findfirst sur ta table liée avec pour critère la variable. Dim Var As Long Dim Rs As Object Set Rs = Forms!formulaire4.Recordset.Clone Rs.FindFirst "[Numéro] = " & Nz(Me![Modifiable1], 0) Var = Rs!Numéro Set Rs = Nothing
Set Rs = Me.Recordset.Clone Rs.FindFirst "[Numéro] = " & Var If Not Rs.EOF Then Me.Bookmark = Rs.Bookmark Set Rs = Nothing
ai-je bien compris la question ? -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jeanne JAMBOU" a écrit dans le message de news: 426684ad$0$840$
Bonjour
Recherche sur tables liées (base fractionnée) Quelle est la syntaxe de la méthode FindFirst pour rechercher dans la table liée les enregistrements ayant la valeur d'un champ dont on dispose (issu de la lecture d'une autre table) dans une fonction VBA
