Méthode Application.GetOption (Access)

  • Article

La méthode GetOption renvoie la valeur actuelle d’une option dans la boîte de dialogue Options Access , disponible en choisissant le bouton Microsoft Office, puis en choisissant Options Access. Variante.

Syntaxe

expression. GetOption (OptionName)

expressionUne variable qui représente un objetApplication.

Paramètres

Nom Requis/Facultatif Type de données Description
OptionName Obligatoire String Nom de l'option. Pour obtenir la liste des chaînes d’arguments de nom d’option, consultez Définir des options à partir de Visual Basic.

Valeur renvoyée

Variant

Remarques

Les méthodes GetOption et SetOption permettent de modifier les options d’environnement à partir du code Visual Basic. À l'aide de ces méthodes, vous pouvez définir ou lire toutes les options disponibles dans la boîte de dialogue Options Access.

Les paramètres disponibles pour les options dépendent du type d'option défini. Il existe trois types d'options :

  • Les options Oui/Non qui peuvent être définies en activant ou en désactivant une case à cocher.

  • Les options qui peuvent être définies en entrant une chaîne ou une valeur numérique.

  • Les options prédéfinies qui peuvent être choisies dans une zone de liste, une zone de liste déroulante ou un groupe d'options.

Pour les options que l’utilisateur définit en sélectionnant ou désactivant une case à cocher, la méthode GetOption renvoie True (1) si le paramètre d’option est Oui (la case à cocher est activée) ou False (0) si le paramètre d’option est Non (la case à cocher est désactivée). Pour définir une option de ce type à l’aide de la méthode SetOption , spécifiez True ou False pour l’argument de paramètre, comme dans l’exemple suivant.

Application.SetOption "Show Status Bar", True

Pour les options que l’utilisateur définit en tapant une chaîne ou une valeur numérique, la méthode GetOption renvoie le paramètre tel qu’il est affiché dans la boîte de dialogue. L’exemple suivant retourne une chaîne contenant le paramètre de marge de gauche.

Dim varSetting As Variant 
varSetting = Application.GetOption("Left Margin")

Pour définir ce type d'option à l'aide de la méthode SetOption, spécifiez la chaîne ou la valeur numérique à taper dans la boîte de dialogue. L’exemple suivant définit le modèle de formulaire par défaut sur OrderTemplate.

Application.SetOption "Form Template", "OrderTemplate"

Pour les options avec des paramètres qui sont des choix dans des zones de liste ou des zones de liste déroulante, la méthode GetOption renvoie un nombre correspondant à la position du paramètre dans la liste. L’indexation commence par zéro, de sorte que la méthode GetOption retourne zéro pour le premier élément, 1 pour le deuxième élément, et ainsi de suite. Par exemple, si l’option Type de champ par défaut sous l’onglet Concepteurs d’objets est définie sur NuméroAuto, sixième élément de la liste, la méthode GetOption renvoie 5.

Pour définir ce type d'option, spécifiez la position numérique de l'option dans la liste en tant qu'argument paramètre pour la méthode SetOption. L’exemple suivant définit l’option Type de champ par défaut sur NuméroAuto.

Application.SetOption "Default Field Type", 5

D’autres options sont définies en choisissant un bouton d’option dans un groupe d’options dans la boîte de dialogue Options d’accès . En Visual Basic, ces options sont également définies en spécifiant la position d’une option particulière dans le groupe d’options. La première option du groupe est numérotée zéro, la seconde, 1, etc. Par exemple, si l’option Comportement de sélection sous l’onglet Concepteurs d’objets est définie sur Partiellement fermée, la méthode GetOption retourne zéro, comme dans l’exemple suivant.

Debug.Print Application.GetOption("Selection Behavior")

Pour définir une option qui appartient à un groupe d'options, spécifiez le numéro d'index de l'option dans le groupe. L’exemple suivant définit le comportement de sélection sur Entièrement fermé.

Application.SetOption "Selection Behavior", 1

Remarque

Lorsque vous quittez Microsoft Access, vous pouvez réinitialiser toutes les options à leurs paramètres d'origine à l'aide de la méthode SetOption sur toutes les options modifiées. Vous souhaiterez peut-être créer des variables publiques pour stocker les valeurs des paramètres d'origine. Vous pouvez inclure du code pour réinitialiser les options dans la procédure événementielle Close d’un formulaire ou dans une procédure de sortie personnalisée que l’utilisateur doit exécuter pour quitter l’application.

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.