Discussion :

[jbulysse]

Bonjour,


J'ai parcouru la FAQ et les tutoriaux et la suppression des alertes dans une Macro sous AC-2007 n'est pas expliquée.

Pour AC-2003, il faut apparemment jouer sur les actions "Avertissement" mais sous 2007, je ne trouve pas d'équivalent.

Quelqu'un aurait une piste?


Merci d'avance

[sendme]

Pour arrêter l'affichage des avertissements liés aux macros, modifiez le niveau de sécurité sur la valeur Faible.

Allez dans l'onglet Niveau de sécurité
(dans le menu Outils, pointez sur Macro et cliquez sur Sécurité).

Si vous n'avez pas l'option Sécurité dans le sous-menu Macro, vous pouvez l'y glisser-déposer en allant la chercher dans :
Menu Affichage -> Barres d'outils -> Personnaliser... -> Onglet Commandes -> Catégorie Outils -> Commande Sécurité...

Voilà.
A+

[jbulysse]

Merci pour cette réponse mais si je suis vos instructions je ne trouve rien qui ressemble à : "-> Catégorie Outils -> Commande Sécurité..."

[rjamin]

Bonsoir,

Peut-être parlez-vous des avertissements lors de l'exécution des requêtes actions, si c'est le cas vous cliquez sur le Bouton Office > Options Access
Onglet Avancé
Options Confirmer décocher ce qui vous intéresse.

RJ

[jbulysse]

En fait, quand je fais uen requete de création de table et que j'ajoute par exemple 4000 ligne dans ma table, même quand je décoche les alertes sur les requêtes actions j'ai toujours des messgaes d'alertes du type : "Voulez-vous ajouter ces 4000 lgines à votre table..." et j'aimerais les faires sauter pour automatiser tout ça!

[sendme]

Dans le code du formulaire executant ta requête, fais comme ci-dessous :

Code :

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

1
2
3
DoCmd.SetWarnings = False
      DoCmd.OpenQuery "nom de ta requête"
DoCmd.SetWarnings = True

Ce cas s'applique à l'éxècution d'une requête via un formulaire. Par contre je ne sait pas si il est possible de supprimer les messages d'avertissement en lançant cette requête manuellement.

[jbulysse]

J'ai une erreur lorsque j'exécute mon code :
"Erreur de compilation : Argument non falcutatif"

Et le code que j'appelle est le suivant :

Code :

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

1
2
3
4
5
Function Desactiver_Alertes ()
DoCmd.SetWarnings = False
DoCmd.OpenQuery "ma_requete"
DoCmd.SetWarnings = True
End Function

Quelqu'un a une idée ?

Merci d'avance!

[Jean-Philippe André]

salut,
je crois qu'il n'est pas nécessaire d'avoir des "="

Code :

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

1
2
3
4
5
Function Desactiver_Alertes ()
DoCmd.SetWarnings  False
DoCmd.OpenQuery "ma_requete"
DoCmd.SetWarnings  True
End Function

[sendme]

effectivement les "=" avant true et false ne sont pas nécessaire.

Plutôt que d'utiliser "Function"

utilise le code suivant :

Code :

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

1
2
3
4
5
Public Sub Desactiver_Alertes ()
DoCmd.SetWarnings  False
    DoCmd.OpenQuery "ma_requete"
DoCmd.SetWarnings  True
End Sub

[jbulysse]

Wonderful It Works :o), Merci!!!!

VBA a encore montré sa suprématie sur l'éditeur de Macros d'Access!