Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Access test d'un champ d'une table

test d'un champ d'une table

4 réponses
Avatar
Fred Pasc
Bonjour,

Ce que je vous demande est une question bête mais je bloque dessus depuis
plus de 2h et je comprends toujours pas:
Je veux exécuter une requête lors de l'appui sur un bouton quitter sur un
formulaire. Cette requête d'ajout ne doit s'exécuter uniquement si les
champs où la valeur va s'insérer sont vide.
Voici mon code (sur le bouton):

Private Sub Bt_Quitter_Click()
On Error GoTo Err_Bt_Quitter_Click
If IsNull("Table.Champ1" And "Table.Champ2") Then
DoCmd.OpenQuery "SupprimerChamp", acNormal, acEdit
DoCmd.OpenQuery "RemplirChamp", acNormal, acEdit
End If
DoCmd.Close

Exit_Bt_Quitter_Click:
Exit Sub
Err_Bt_Quitter_Click:
MsgBox Err.Description
Resume Exit_Bt_Quitter_Click
End Sub


Ce qui ne marche pas c'est qu'il ne veut pas me reconnaître ma table dans le
if.
Si quelqu'un pouvait m'aider ça serait vraiment bien.
Merci d'avance

A+
Fred
Signaler un problème avec ce contenu

4 réponses

Supprimer
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
Avatar
Fred Pasc
Re-Bonjour

Si jamais je me suis mal exprimé veuillez me le dire car je suis vraiment
bloqué et ce que je demande est indispensable pour mon appli.
Pour simplifier, je veux exécuter une requête de type INSERT INTO mais
uniquement lorsque la ligne de la table concerné est vide.
Je n'arrive pas à le faire
Merci d'avoir pris le temps de me lire
Merci de m'aider si vous le pouvez

A+
fred
"Fred Pasc" a écrit dans le message de news:
d7k015$omr$
Bonjour,

Ce que je vous demande est une question bête mais je bloque dessus depuis
plus de 2h et je comprends toujours pas:
Je veux exécuter une requête lors de l'appui sur un bouton quitter sur un
formulaire. Cette requête d'ajout ne doit s'exécuter uniquement si les
champs où la valeur va s'insérer sont vide.
Voici mon code (sur le bouton):

Private Sub Bt_Quitter_Click()
On Error GoTo Err_Bt_Quitter_Click
If IsNull("Table.Champ1" And "Table.Champ2") Then
DoCmd.OpenQuery "SupprimerChamp", acNormal, acEdit
DoCmd.OpenQuery "RemplirChamp", acNormal, acEdit
End If
DoCmd.Close

Exit_Bt_Quitter_Click:
Exit Sub
Err_Bt_Quitter_Click:
MsgBox Err.Description
Resume Exit_Bt_Quitter_Click
End Sub


Ce qui ne marche pas c'est qu'il ne veut pas me reconnaître ma table dans
le

if.
Si quelqu'un pouvait m'aider ça serait vraiment bien.
Merci d'avance

A+
Fred




Avatar
Fred Pasc
Re ...
Bon, c'est pas grave, j'ai fait autrement. Merci à ceux qui m'ont lu
A+
Fred

"Fred Pasc" a écrit dans le message de news:
d7kg71$2ph$
Re-Bonjour

Si jamais je me suis mal exprimé veuillez me le dire car je suis vraiment
bloqué et ce que je demande est indispensable pour mon appli.
Pour simplifier, je veux exécuter une requête de type INSERT INTO mais
uniquement lorsque la ligne de la table concerné est vide.
Je n'arrive pas à le faire
Merci d'avoir pris le temps de me lire
Merci de m'aider si vous le pouvez

A+
fred
"Fred Pasc" a écrit dans le message de news:
d7k015$omr$
Bonjour,

Ce que je vous demande est une question bête mais je bloque dessus
depuis


plus de 2h et je comprends toujours pas:
Je veux exécuter une requête lors de l'appui sur un bouton quitter sur
un


formulaire. Cette requête d'ajout ne doit s'exécuter uniquement si les
champs où la valeur va s'insérer sont vide.
Voici mon code (sur le bouton):

Private Sub Bt_Quitter_Click()
On Error GoTo Err_Bt_Quitter_Click
If IsNull("Table.Champ1" And "Table.Champ2") Then
DoCmd.OpenQuery "SupprimerChamp", acNormal, acEdit
DoCmd.OpenQuery "RemplirChamp", acNormal, acEdit
End If
DoCmd.Close

Exit_Bt_Quitter_Click:
Exit Sub
Err_Bt_Quitter_Click:
MsgBox Err.Description
Resume Exit_Bt_Quitter_Click
End Sub


Ce qui ne marche pas c'est qu'il ne veut pas me reconnaître ma table
dans


le
if.
Si quelqu'un pouvait m'aider ça serait vraiment bien.
Merci d'avance

A+
Fred








Avatar
Pierre CFI [mvp]
bonjour
je pense que tu veux dire , si 2 champs du form ne sont pas remplis ?
modifie ici , ta syntaxe est fausse
If IsNull(Me.Champ1) And Isnull(Me.Champ2) then
....
je mettrais méme
If (IsNull(Me.Champ1) or Me.Champ1 ="" ) And (Isnull(Me.Champ2) or Me.Champ2 ="" ) then


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net

"Fred Pasc" a écrit dans le message de news: d7kjlt$536$
Re ...
Bon, c'est pas grave, j'ai fait autrement. Merci à ceux qui m'ont lu
A+
Fred

"Fred Pasc" a écrit dans le message de news:
d7kg71$2ph$
Re-Bonjour

Si jamais je me suis mal exprimé veuillez me le dire car je suis vraiment
bloqué et ce que je demande est indispensable pour mon appli.
Pour simplifier, je veux exécuter une requête de type INSERT INTO mais
uniquement lorsque la ligne de la table concerné est vide.
Je n'arrive pas à le faire
Merci d'avoir pris le temps de me lire
Merci de m'aider si vous le pouvez

A+
fred
"Fred Pasc" a écrit dans le message de news:
d7k015$omr$
Bonjour,

Ce que je vous demande est une question bête mais je bloque dessus
depuis


plus de 2h et je comprends toujours pas:
Je veux exécuter une requête lors de l'appui sur un bouton quitter sur
un


formulaire. Cette requête d'ajout ne doit s'exécuter uniquement si les
champs où la valeur va s'insérer sont vide.
Voici mon code (sur le bouton):

Private Sub Bt_Quitter_Click()
On Error GoTo Err_Bt_Quitter_Click
If IsNull("Table.Champ1" And "Table.Champ2") Then
DoCmd.OpenQuery "SupprimerChamp", acNormal, acEdit
DoCmd.OpenQuery "RemplirChamp", acNormal, acEdit
End If
DoCmd.Close

Exit_Bt_Quitter_Click:
Exit Sub
Err_Bt_Quitter_Click:
MsgBox Err.Description
Resume Exit_Bt_Quitter_Click
End Sub


Ce qui ne marche pas c'est qu'il ne veut pas me reconnaître ma table
dans


le
if.
Si quelqu'un pouvait m'aider ça serait vraiment bien.
Merci d'avance

A+
Fred












Avatar
Fred Pasc
Bonjour,
Merci beaucoup
Je teste ça demain
Je te remercie par avance

A+
Fred

"Pierre CFI [mvp]" a écrit dans le message de
news: uwnCj#
bonjour
je pense que tu veux dire , si 2 champs du form ne sont pas remplis ?
modifie ici , ta syntaxe est fausse
If IsNull(Me.Champ1) And Isnull(Me.Champ2) then
....
je mettrais méme
If (IsNull(Me.Champ1) or Me.Champ1 ="" ) And (Isnull(Me.Champ2) or
Me.Champ2 ="" ) then



--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net

"Fred Pasc" a écrit dans le message de news:
d7kjlt$536$

Re ...
Bon, c'est pas grave, j'ai fait autrement. Merci à ceux qui m'ont lu
A+
Fred

"Fred Pasc" a écrit dans le message de news:
d7kg71$2ph$
Re-Bonjour

Si jamais je me suis mal exprimé veuillez me le dire car je suis
vraiment



bloqué et ce que je demande est indispensable pour mon appli.
Pour simplifier, je veux exécuter une requête de type INSERT INTO mais
uniquement lorsque la ligne de la table concerné est vide.
Je n'arrive pas à le faire
Merci d'avoir pris le temps de me lire
Merci de m'aider si vous le pouvez

A+
fred
"Fred Pasc" a écrit dans le message de news:
d7k015$omr$
Bonjour,

Ce que je vous demande est une question bête mais je bloque dessus
depuis


plus de 2h et je comprends toujours pas:
Je veux exécuter une requête lors de l'appui sur un bouton quitter
sur




un
formulaire. Cette requête d'ajout ne doit s'exécuter uniquement si
les




champs où la valeur va s'insérer sont vide.
Voici mon code (sur le bouton):

Private Sub Bt_Quitter_Click()
On Error GoTo Err_Bt_Quitter_Click
If IsNull("Table.Champ1" And "Table.Champ2") Then
DoCmd.OpenQuery "SupprimerChamp", acNormal, acEdit
DoCmd.OpenQuery "RemplirChamp", acNormal, acEdit
End If
DoCmd.Close

Exit_Bt_Quitter_Click:
Exit Sub
Err_Bt_Quitter_Click:
MsgBox Err.Description
Resume Exit_Bt_Quitter_Click
End Sub


Ce qui ne marche pas c'est qu'il ne veut pas me reconnaître ma table
dans


le
if.
Si quelqu'un pouvait m'aider ça serait vraiment bien.
Merci d'avance

A+
Fred