Instruction AppActivate

Active une fenêtre d'application.

Syntaxe

Titre AppActivate, [wait ]

La syntaxe de l'instruction AppActivate comporte les arguments nommés suivants :

Élément Description
title Obligatoire. Expression de chaîne spécifiant le titre dans la barre de titre de la fenêtre d'application à activer. L'ID de tâche renvoyé par la fonction Shell peut être utilisé à la place de title pour activer une application.
wait Facultatif. Valeur booléenne indiquant si l'application appelante a le focus avant qu'une autre ne soit activée. Si la valeur est False (valeur par défaut), l'application spécifiée est immédiatement activée, même si l'application appelante n'a pas le focus. Si la valeur est True, l’application appelante attend qu’elle ait le focus, puis active l’application spécifiée.

Remarques

L'instruction AppActivate place le focus sur la fenêtre ou l'application nommée, mais ne permet pas de l'agrandir ou de la réduire. La fenêtre activée perd le focus lorsque l'utilisateur change le focus ou ferme la fenêtre. Utilisez la fonction Shell pour démarrer une application et définir le style de la fenêtre.

Pour déterminer l’application à activer, title est comparé à la chaîne de titre de chaque application en cours d’exécution. En l'absence de correspondance exacte, toute application dont la chaîne de titre commence par title est activée. Si plusieurs instances de l'application sont nommées par title, l'une d'elles est arbitrairement activée.

Exemple

Cet exemple illustre plusieurs utilisations de l'instruction AppActivate pour activer une fenêtre d'application. Les instructions Shell supposent que les applications se trouvent dans les chemins spécifiés. Sur Macintosh, le nom du lecteur par défaut est « HD » et les portions du nom de chemin d’accès sont séparées par des points-virgules au lieu de barres obliques inverses.

Dim MyAppID, ReturnValue 
AppActivate "Microsoft Word" ' Activate Microsoft 
 ' Word. 
 
' AppActivate can also use the return value of the Shell function. 
MyAppID = Shell("C:\WORD\WINWORD.EXE", 1) ' Run Microsoft Word. 
AppActivate MyAppID ' Activate Microsoft 
 ' Word. 
 
' You can also use the return value of the Shell function. 
ReturnValue = Shell("c:\EXCEL\EXCEL.EXE",1) ' Run Microsoft Excel. 
AppActivate ReturnValue ' Activate Microsoft 
 ' Excel. 

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.