[VBA -A]Code pour répondre au question des msg d'alertes

Version imprimable

22/03/2006, 18h32
soad029

[VBA -A]Code pour répondre au question des msg d'alertes

Bonsoir tout le monde !

Je fais une appli sous Access (avec un formulaire) qui copie de nombreux graphiques provenant de fichiers Excel dans un document word. Tout marche bien, sauf que j'ai de nombreux message lors de l'éxécution de l'appli du style :

* "Voulez-vous mettre à jour les liaisons..." -> "mettre à jour" "ne pas mettre à jour"...

* "Voulez-vous enregistrer les modifications apportées" -> "oui" "non"

J'aurais aimé trouver un code qui permettrait de répondre à la place de l'utilisateur car je dois avouer que c'est assez enquiquinant de cliquer à chaque fois.

Après une recherche sur le forum et sur le Internet, j'ai trouvé la commande

sendKeys "{LEFT}" puis
sendKeys "{LEFT}" puis
sendKeys "{ENTER}" Pour sélectionner la 3ème option, mais en faite ça marche pas.

Quelqu'un aurait t'il une solution, ou un début de solution à ce problème ?

Un grand merci d'avance en tout cas !!

Aller, bonne soirée !

par e
22/03/2006, 18h46
ThierryAIM

Code:

DoCmd.SetWarnings False

c'est beaucoup mieux que d'appuyer sur les touches ou de les simuler :lol:
23/03/2006, 10h14
soad029

Salut Thierry ! Et merci d'avoir répondu !

En faite, je connaissais déjà cette commande, qui permet de ne pas afficher les messages généré par Access.Hors, les messages que j'ai sont généré par Excel, donc cela ne marche pas :(
23/03/2006, 11h26
Megaxel

Tu as des graphiques sous Excel que tu copies dans Word.
Que vient faire Access ici? C'est là que se trouve les données des graphiques?
Le "DoCmd" de Thierry, tu ne peux pas l'appliquer spécifiquement à ton objet "Application Excel"? Je ne sais pas trop, mais c'est peut-être possible?
23/03/2006, 11h32
soad029

Salut !

Mon application est faite sous Access, je code sous Acces si tu préfères. Les graphiques se trouvent dans des fichiers Excel. Docmd n'est propre qu'a Access, on ne peut l'appliquer à Excel.

Merci d'avoir répondu en tout cas !
23/03/2006, 11h51
ThierryAIM

alors si c'est Excel qui te génère les messages essaie avec :

Code:

Application.DisplayAlerts = False
23/03/2006, 12h00
GoLDoZ

Citation:

Envoyé par ThierryAIM

alors si c'est Excel qui te génère les messages essaie avec :

Code:

Application.DisplayAlerts = False

j'allais le dire :lol:

je viens de chercher sur le net pour le même pb, et ça fonctionne impec
23/03/2006, 12h14
SilkyRoad
bonjour à tous

dans Excel , la propriété AskToUpdateLinks= False permet la mise à jour des liaisons automatiquement sans affichage de la boîte de dialogue
Code:

1 2 3 4 5 6 7 8 Sub maProcedure() Application.AskToUpdateLinks = False ' ' ma procedure ... ' Application.AskToUpdateLinks = True End Sub
bonne journée
michel
23/03/2006, 12h21
soad029

Vraiment bien ce forum ! Vivement que je m'améliore pour aider un peu !

Merci à tous, ça marche nickel !!

Bon' @p' :wink: