J'ai une requête avec dans la zone critères le nom d'un champ sur un
formulaire
je voudrais pouvoir l'utiliser a partir d'un deuxième formulaire.
Il me faut donc renseigner la zone critères de ma requête en lui disant
d'aller chercher la valeur dans champ2 sur formulaire2 si le champ1 sur
formulaire1 est fermé.
Cela est il possible ?
Si oui quelle est la syntaxe ?
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
Gafish
Bonjour,
Tu peux te faire une fonction publique que tu mets dans un module standard qui teste l'ouverture d'un formulaire :
Public Function EstChargé(ByVal chNomForm As String) As Boolean ' Renvoie Vrai si le formulaire spécifié est chargé. Dim f As Form On Error Resume Next EstChargé = True Set f = Forms(chNomForm) If f Is Nothing Then EstChargé = False On Error GoTo 0 End If
End Function
et dans ta requête tu utilises cette fonction avec un vraifaux par exemple : VraiFaux(EstCharge("Formulaire1)=True;Forms![Formulaire1]![MaValeur];Forms![ Formulaire2]![MaValeur])
Arnaud
"Jorge" a écrit dans le message news: 420b162c$0$2178$
Bonjour tous le monde
J'ai une requête avec dans la zone critères le nom d'un champ sur un formulaire je voudrais pouvoir l'utiliser a partir d'un deuxième formulaire. Il me faut donc renseigner la zone critères de ma requête en lui disant d'aller chercher la valeur dans champ2 sur formulaire2 si le champ1 sur formulaire1 est fermé. Cela est il possible ? Si oui quelle est la syntaxe ?
Merci d'avance pour votre aide.
Bonjour,
Tu peux te faire une fonction publique que tu mets dans un module standard
qui teste l'ouverture d'un formulaire :
Public Function EstChargé(ByVal chNomForm As String) As Boolean
' Renvoie Vrai si le formulaire spécifié est chargé.
Dim f As Form
On Error Resume Next
EstChargé = True
Set f = Forms(chNomForm)
If f Is Nothing Then
EstChargé = False
On Error GoTo 0
End If
End Function
et dans ta requête tu utilises cette fonction avec un vraifaux par exemple :
VraiFaux(EstCharge("Formulaire1)=True;Forms![Formulaire1]![MaValeur];Forms![
Formulaire2]![MaValeur])
Arnaud
"Jorge" <sdfsdfshhhdf@wanadoo.fr> a écrit dans le message news:
420b162c$0$2178$8fcfb975@news.wanadoo.fr...
Bonjour tous le monde
J'ai une requête avec dans la zone critères le nom d'un champ sur un
formulaire
je voudrais pouvoir l'utiliser a partir d'un deuxième formulaire.
Il me faut donc renseigner la zone critères de ma requête en lui disant
d'aller chercher la valeur dans champ2 sur formulaire2 si le champ1 sur
formulaire1 est fermé.
Cela est il possible ?
Si oui quelle est la syntaxe ?
Tu peux te faire une fonction publique que tu mets dans un module standard qui teste l'ouverture d'un formulaire :
Public Function EstChargé(ByVal chNomForm As String) As Boolean ' Renvoie Vrai si le formulaire spécifié est chargé. Dim f As Form On Error Resume Next EstChargé = True Set f = Forms(chNomForm) If f Is Nothing Then EstChargé = False On Error GoTo 0 End If
End Function
et dans ta requête tu utilises cette fonction avec un vraifaux par exemple : VraiFaux(EstCharge("Formulaire1)=True;Forms![Formulaire1]![MaValeur];Forms![ Formulaire2]![MaValeur])
Arnaud
"Jorge" a écrit dans le message news: 420b162c$0$2178$
Bonjour tous le monde
J'ai une requête avec dans la zone critères le nom d'un champ sur un formulaire je voudrais pouvoir l'utiliser a partir d'un deuxième formulaire. Il me faut donc renseigner la zone critères de ma requête en lui disant d'aller chercher la valeur dans champ2 sur formulaire2 si le champ1 sur formulaire1 est fermé. Cela est il possible ? Si oui quelle est la syntaxe ?
