Soient:
- Un formulaire (form1) en single form.
- Un sous formulaire de form1 en continuous form (form2).
- Un champ de form2 (field2) et une valeur possible value2
- Un traitement (Sub1)
je voudrais m'assurer, avant d'executer le traitement sub1=20
=E0 partir de form1, que la valeur value2 ne se trouve pas=20
dans un des field2 de form2.
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
3stone
Salut,
"DD" Pourriez-vous m'aider sur le problème suivant:
Soient: - Un formulaire (form1) en single form. - Un sous formulaire de form1 en continuous form (form2). - Un champ de form2 (field2) et une valeur possible value2 - Un traitement (Sub1) je voudrais m'assurer, avant d'executer le traitement sub1 à partir de form1, que la valeur value2 ne se trouve pas dans un des field2 de form2.
Tu peux faire ainsi:
code à placer dans un événement du form1...
With Me.form2.Form.RecordsetClone
'=> si value2 est numérique .FindFirst "field2=" & Value2
'=> si value2 est texte .FindFirst "field2='" & Value2 & "'"
If .NoMatch Then MsgBox "Absent" Else MsgBox "Présent" Exit sub 'tu vas pas plus loin... End If End With
Tu ne garde qu'un des deux FindFirst, selon le type de value2
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
Salut,
"DD"
Pourriez-vous m'aider sur le problème suivant:
Soient:
- Un formulaire (form1) en single form.
- Un sous formulaire de form1 en continuous form (form2).
- Un champ de form2 (field2) et une valeur possible value2
- Un traitement (Sub1)
je voudrais m'assurer, avant d'executer le traitement sub1
à partir de form1, que la valeur value2 ne se trouve pas
dans un des field2 de form2.
Tu peux faire ainsi:
code à placer dans un événement du form1...
With Me.form2.Form.RecordsetClone
'=> si value2 est numérique
.FindFirst "field2=" & Value2
'=> si value2 est texte
.FindFirst "field2='" & Value2 & "'"
If .NoMatch Then
MsgBox "Absent"
Else
MsgBox "Présent"
Exit sub 'tu vas pas plus loin...
End If
End With
Tu ne garde qu'un des deux FindFirst, selon le type de value2
--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------
"DD" Pourriez-vous m'aider sur le problème suivant:
Soient: - Un formulaire (form1) en single form. - Un sous formulaire de form1 en continuous form (form2). - Un champ de form2 (field2) et une valeur possible value2 - Un traitement (Sub1) je voudrais m'assurer, avant d'executer le traitement sub1 à partir de form1, que la valeur value2 ne se trouve pas dans un des field2 de form2.
Tu peux faire ainsi:
code à placer dans un événement du form1...
With Me.form2.Form.RecordsetClone
'=> si value2 est numérique .FindFirst "field2=" & Value2
'=> si value2 est texte .FindFirst "field2='" & Value2 & "'"
If .NoMatch Then MsgBox "Absent" Else MsgBox "Présent" Exit sub 'tu vas pas plus loin... End If End With
Tu ne garde qu'un des deux FindFirst, selon le type de value2
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
