WorksheetFunction オブジェクト (Excel)WorksheetFunction object (Excel)

Visual Basic から呼び出すことができる Excel ワークシート関数のコンテナーとして使用されます。Used as a container for Microsoft Excel worksheet functions that can be called from Visual Basic.

例Example

WorksheetFunction オブジェクトを戻すには、Application オブジェクトの WorksheetFunction プロパティを使用します。Use the WorksheetFunction property of the Application object to return the WorksheetFunction object.

次の使用例は、 Min ワークシート関数をセル範囲 A1:C10 に適用した結果を表示します。The following example displays the result of applying the Min worksheet function to the range A1:C10.

Set myRange = Worksheets("Sheet1").Range("A1:C10") 
answer = Application.WorksheetFunction.Min(myRange) 
MsgBox answer

この例は、CountA ワークシート関数を使用して、列 A 内のセルのうち値が含まれるセルの数を確認します。This example uses the CountA worksheet function to determine how many cells in column A contain a value. この例では、列 A 内の値として文字が含まれている必要があります。For this example, the values in column A should be text. この例は、列 A 内の各値に対してスペル チェックを実行し、値のスペルが誤っている場合は文字 "Wrong" を列 B に挿入し、それ以外の場合は文字 "OK" を列 B に挿入します。This example does a spell check on each value in column A, and if the value is spelled incorrectly, inserts the text "Wrong" into column B; otherwise, it inserts the text "OK" into column B.

Sub StartSpelling()
   'Set up your variables
   Dim iRow As Integer
   
   'And define your error handling routine.
   On Error GoTo ERRORHANDLER
   
   'Go through all the cells in column A, and perform a spellcheck on the value.
   'If the value is spelled incorrectly, write "Wrong" in column B; otherwise, write "OK".
   For iRow = 1 To WorksheetFunction.CountA(Columns(1))
      If Application.CheckSpelling( _
         Cells(iRow, 1).Value, , True) = False Then
         Cells(iRow, 2).Value = "Wrong"
      Else
         Cells(iRow, 2).Value = "OK"
      End If
   Next iRow
   Exit Sub

    'Error handling routine.
ERRORHANDLER:
    MsgBox "The spell check feature is not installed!"
    
End Sub

メソッドMethods

プロパティProperties

関連項目See also

サポートとフィードバック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.