Valider boîte de dialogue auto

Bonjour à toutes et tous !

J'ai besoin d'un conseil concernant la validation des boîtes de dialogue.

Lorsque j'exécute un code vba, une boîte de dialogue apparaît. Pour la valider automatiquement, j'insère cette ligne juste avant le paragraphe à exécuter : SendKeys "{ENTER}", False

Exemple :

    SendKeys "{ENTER}", False
    ActiveWorkbook.SaveAs Filename:="F:\clé_bigboo\cours_d_info\ bla bla bla....

Problème : Le sendKeys fonctionne lorsque le bouton par défaut est "OUI" (ou "valider). Dans ce cas précis, le bouton par défaut est "non". Comment faire valider ma boîte de dialogue par l'affirmative ?

Bonne après-midi et merci d'avance pour votre aide.

Bigboo

Bonjour,

Pour te donner un conseil efficace, il nous faut le fichier avec le code.

Bonjour,

met Application.DisplayAlerts = False avant, rétabli avec =True après.

.SaveAs est l'exception de DisplayAlerts = False où vba ne valide pas avec le choix par défaut.

eric

Bonjour !

Merci pour votre aide. Eriiic, ta solution fonctionne parfaitement.

Merci et bonne journée !