GetAllSettings 関数

注: Microsoft Jet Expression Service がサンドボックス モードで実行されている場合 (安全でない可能性がある式の評価は行われません)、このトピックで説明する関数、メソッド、オブジェクト、またはプロパティは無効です。サンドボックス モードの詳細については、ヘルプで "サンドボックス モード" を検索してください。

Windows レジストリ内のアプリケーションのエントリ、または (Macintosh 上の) アプリケーションの初期化ファイル内の情報から、キー設定とそれぞれの値 (元は SaveSetting で作成) のリストを返します。

構文

GetAllSettings ( appname , section )

GetAllSettings 関数の構文には、次の引数があります。

引数

説明

appname

必須です。名前またはキー設定を要求するアプリケーションまたはプロジェクトを含む文字形式です。Macintosh では、これはシステム フォルダーの [環境設定] フォルダーにある初期化ファイルのファイル名です。

section

必須です。キー設定を要求するセクションの名前を含む文字形式です。GetAllSettings では、内容が指定したセクションのすべてのキー設定とそれに対応する値を含む 2 次元の 配列 文字列であるバリアント型を返します。


解説

GetAllSettings では、appname または section のいずれかが存在しない場合、初期化されていないバリアント型を返します。

注: 次の例は、Visual Basic for Applications (VBA) モジュールでのこの関数の使用方法を示しています。 VBA の使用方法の詳細については、[検索] の横にあるドロップダウン リストで [開発者用リファレンス] を選び、検索ボックスに検索する用語を入力します。

この例では、最初に SaveSetting ステートメントを使用して、appname として指定されたアプリケーションの Windows レジストリにエントリを作成し、GetAllSettings 関数を使用して設定を表示します。アプリケーション名と section の名前は、GetAllSettings で取得することはできないことにご注意ください。最後に、DeleteSetting ステートメントでアプリケーションのエントリを削除します。

' 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"
スキルを磨く
トレーニングの探索
新機能を最初に入手
Office Insider に参加する

この情報は役に立ちましたか?

ご意見をいただきありがとうございます。

フィードバックをお寄せいただき、ありがとうございます。Office サポートの担当者におつなぎいたします。

×