Discussion :

[joquetino]

Bonsoir à tous,

J'ai défini dans une base Access une Macro (grâce à l'assistant graphique). Ma Macro exécute des requêtes (via OuvrirRequête).

Ma première requête importe des données dans une table, appelée "Table1".
Ce que j'aimerai, c'est tester juste après s'il y a des champs vides, et si c'est vrai arrêter la macro, avec un message à l'écran. Si la table est ok, la macro s'éxécute normalement (en exécutant les autres requêtes)

Ca vous semble possible?

Merci

[fevec]

Bonjour,
Je n'utilise plus les macros...

As tu une "obligation" d'utiliser une macro, ou peux tu faire cela en VBA ?

si ta macro fonctionne, je te conseillerrais volontiers de l'enregistrer sous ..code VBA.

dans ce code, tu ajoute les tests que tu veux :
(par exemple avec Dcount, Dsum...)

en fonction des tests avec des msgbox tu peux poursuivre ou non ton processus

en espérant faire avancer...

cordialement,
fevec

[joquetino]

Hello,

Merci de ta réponse. Il faut par contre absolument que je passe par une macro "graphique". Il y a la possibilité d'ajouter la fonction "exécuterCode". Donc je pensais définir une procédure VBA, qui teste la table, et qui stoppe la macro lorsque des champs sont vides. Mais quel code me permet de stopper la macro, voilà le souci ...

[le_niak]

Salut,

TU peux en VBA faire un recorset sur la table dont les données sont importées, vérifier s'il ya des enregistrements et ensuite executer ta macro.

Voici un exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Set cop = CurrentDb.OpenRecordset("Composition FoF, date fixee")
cop.MoveLast
cop.MoveFirst
MaxNAV = cop.RecordCount
 
if (MAxNAV>0) then
Call macro
End if