Bonjour le forum,

Nouveau blocage douloureux. Nouvelle demande d'aide.

TableA
Champ1 : Texte
Champ2 : Texte
Champ3 : Texte

Les trois champs définis comme Clé Primaire pour interdire les combinaisons doublonnées et nul interdit.

Dans cette table, je souhaite
1 - Coller par ajout des données copiées dans Excel
2 - Avertir par un message contenant le nom d'un de ces champs si ce champ a pour valeur nul, (et demander que ce champ soit rempli dans Excel, avant copie) et donc arrêter la procédure.
3 - Coller les combinaisons doublonnées dans Table des erreurs (idem qu'en cas de collage manuel)

Je tourne en rond entre Macro, Module Sub ou Fonction.

Avec
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Option Compare Database
Sub AddInTableA()
DoCmd.OpenTable "TableA", acViewNormal
 DoCmd.GoToRecord acDataTable, "TableA", acNewRec
 DoCmd.RunCommand acCmdPasteAppend
End Sub

Puis j'appelle la fonction suivante dans une macro avec Avertissement : non / ExécuterCode : Test ()
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Function Test()
Call AddInTableA
End Function
Jusque que là tout paraît fonctionner. Les champs corrects sont collés, les doublons vont dans la Table des erreurs tout bien.
Par contre, je semble incapable d'articuler le message d'arrêt en cas de valeur nulle.

Ici, dehors, le temps est sublime, j'espère malgré cela, trouver une bonne âme de programmeur de l'ombre... Merci d'avance.