GetAllSettings, fonction

Remarque : La fonction, la méthode, l’objet ou la propriété décrits dans cette rubrique est désactivée si le service d’expressions de Microsoft Jet s’exécute en mode sandbox, ce qui empêche l’évaluation d’expressions potentiellement non sûres. Pour plus d’informations sur le mode sandbox, recherchez « mode sandbox » dans l’Aide.

Renvoie une liste des paramètres clés et leurs valeurs respectives (initialement créées avec SaveSetting)à partir de l’entrée d’une application dans le Registre Windows ou (sur Macintosh) des informations dans le fichier d’initialisation de l’application.

Syntaxe

GetAllSettings (nom de l’application, section)

La syntaxe de la fonction GetAllSettings présente les arguments suivantes :

Argument

Description

appname

Obligatoire. Expression de chaîne contenant le nom de l’application ou projet dont les paramètres de clé sont demandés. Sur un Macintosh, il s’agit du nom de fichier du fichier d’initialisation dans le dossier Préférences du dossier Système.

section

Obligatoire. Chaîne expression contenant le nom de la section dont les paramètres de touche sont demandés. GetAllSettings renvoie une variante dont le contenu est une matrice bidimensionnelle de chaînes contenant tous les paramètres clés de la section spécifiée et leurs valeurs correspondantes.


Remarques

GetAllSettings renvoie une variante non spécifique si lenom de l’application ou la section n’existe pas.

Exemple

Remarque : Les exemples qui suivent illustrent l’utilisation de cette fonction dans un module Visual Basic pour Applications (VBA). Pour plus d’informations sur l’travail avec VBA, sélectionnez Référence du développeur dans la liste verte en regard de Rechercher, puis entrez un ou plusieurs termes dans la zone de recherche.

Cet exemple utilise d’abord l’instruction SaveSetting pour effectuer des entrées dans le Registre Windows pour l’application spécifiéecomme nom_application, puis utilise la fonction GetAllSettings pour afficher les paramètres. Notez que les noms d’application et de section ne peuvent pas être récupérés avec GetAllSettings. Enfin, l’instruction DeleteSetting supprime les entrées de l’application.

' Variant to hold 2-dimensional array returned by GetAllSettings
' Integer to hold counter.
Dim MySettings As Variant, intSettings As Integer
' Place some settings in the registry.
SaveSetting appname := "MyApp", section := "Startup", _
key := "Top", setting := 75
SaveSetting "MyApp","Startup", "Left", 50
' Retrieve the settings.
MySettings = GetAllSettings(appname := "MyApp", section := "Startup")
For intSettings = LBound(MySettings, 1) To UBound(MySettings, 1)
Debug.Print MySettings(intSettings, 0), MySettings(intSettings, 1)
Next intSettings
DeleteSetting "MyApp", "Startup"

Besoin d’aide ?

Développez vos compétences dans Office
Découvrez des formations
Accédez aux nouvelles fonctionnalités en avant-première
Rejoignez le programme Office Insider

Ces informations vous ont-elles été utiles ?

Nous vous remercions pour vos commentaires.

Merci pour vos commentaires. Il serait vraisemblablement utile pour vous de contacter l’un de nos agents du support Office.

×