registeredfunctions プロパティ (Excel)Application.RegisteredFunctions property (Excel)

dll (ダイナミックリンクライブラリ) または REGISTER または REGISTER.ID macro 関数に登録されているコードリソースの関数についての情報を返します。Returns information about functions in either dynamic-link libraries (DLLs) or code resources that were registered with the REGISTER or REGISTER.ID macro functions. バリアント型 (Variant) の値を使用します。Read-only Variant.


registeredfunctions(Index1Index2)expression.RegisteredFunctions (Index1, Index2)

expression**Application** オブジェクトを 表す変数。expression A variable that represents an Application object.


名前Name 必須 / オプションRequired/Optional データ型Data type 説明Description
Index1Index1 省略可能Optional VariantVariant DLL またはコード リソースの名前を指定します。The name of the DLL or code resource.
Index2Index2 省略可能Optional VariantVariant 関数名を指定します。The name of the function.


引数 index を指定しない場合、このプロパティは、登録されているすべての関数の一覧を含む配列を返します。If you don't specify the index arguments, this property returns an array that contains a list of all registered functions. 配列内の各行には、次の表に示すように、1 つの関数についての情報が入っています。Each row in the array contains information about a single function, as shown in the following table.

Column コンテンツContents
1-d1 DLL またはコード リソースの名前を指定します。The name of the DLL or code resource.
pbm-22 DLL またはコードリソースのプロシージャの名前を指定します。The name of the procedure in the DLL or code resource.
1/33 戻り値のデータ型、および引数の数とデータ型を指定する文字列。Strings specifying the data types of the return values, and the number and data types of the arguments.

登録されている関数がないとき、Null 値を返します。If there are no registered functions, this property returns null.


次の使用例は、登録されている関数のリストをシート 1 に作成します。This example creates a list of registered functions, placing one registered function in each row on Sheet1. 列 A には DLL またはコード リソースの絶対パスとファイル名、列 B には関数名、列 C には引数のデータ型を指定する文字列が表示されます。Column A contains the full path and file name of the DLL or code resource, column B contains the function name, and column C contains the argument data type code.

theArray = Application.RegisteredFunctions 
If IsNull(theArray) Then 
 MsgBox "No registered functions" 
 For i = LBound(theArray) To UBound(theArray) 
 For j = 1 To 3 
 Worksheets("Sheet1").Cells(i, j). _ 
 Formula = theArray(i, j) 
 Next j 
 Next i 
End If

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.