VBA で、ワークシート関数を使用(WorksheetFunction プロパティ)
VBA で、ワークシと関数を使用
VBA から、ワークシート関数を呼び出す場合、WorksheetFunction プロパティ を使用します。引数に、セルアドレスを指定する場合は、Range オブジェクト を指定します。ただし、全てのワークシート関数が使えるわけではありません。
【書式】
object.WorksheetFunction.function
引数・戻り値
- object ・・・ 対象となる Application オブジェクトを指定します。
- function ・・・ ワークシート関数
ワークシート関数 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 |
Sub Sample_WorkSheetFunction() Const SYOHIZEI = 0.08 Dim i As Integer For i = 2 To 8 'ワークシート関数の Round 関数で、小数点以下を四捨五入 Cells(i, 3).Value = _ Application.WorksheetFunction.Round(Cells(i, 2).Value * SYOHIZEI, 0) 'ワークシート関数の Sum 関数で合計を求める Cells(i, 4).Value = _ Application.WorksheetFunction.Sum(Range(Cells(i, 2), Cells(i, 3))) Next i '各列の合計を Sum 関数で求める Range("B9").Value = Application.WorksheetFunction.Sum(Range("B1:B8")) Range("C9").Value = Application.WorksheetFunction.Sum(Range("C1:C8")) Range("D9").Value = Application.WorksheetFunction.Sum(Range("D1:D8")) End Sub |
実行結果
サンプルVBAソース実行前
実行後
関連記事
-
-
網かけ(パターン)の取得・設定(Pattern プロパティ)
網かけ(パターン)を取得・設定する セルの背景に網かけ(パターン)を設定したり、 …
-
-
オートフィルタの設定と解除(AutoFilter メソッド)
AutoFilter メソッド オートフィルタを設定する場合、AutoFilte …
-
-
セル範囲を結合・結合を解除(Merge メソッド・UnMerge メソッド)
Merge メソッド・UnMerge メソッド セルを結合するには、指定したセル …
-
-
フリガナの取得(GetPhonetic メソッド)
GetPhonetic メソッド GetPhonetic メソッドは、指定した文 …
-
-
指定したセルへ移動(Goto メソッド)
指定したセルへ移動 指定したシートの指定したセルへジャンプするには、Goto メ …
-
-
列名を取得、列番号を取得(Address プロパティ,Column プロパティ)
列番号を取得する セル番地(「A1」や「B3」)や列名(「A」「B」「C」 …
-
-
文字列を縮小して全体を表示(ShrinkToFit プロパティ)
ShrinkToFit プロパティ ShrinkToFit プロパティは、セルに …
-
-
入力規則(リストで制限する)Validation.Add メソッド
ドロップダウンリストで入力値を制限 Validation.Add メソッド(また …
-
-
入力規則(日本語入力)Validation オブジェクト,IMEMode プロパティ
IMEMode プロパティ Validation.IMEMode プロパティ を …
-
-
セルをアクティブにする・セルを選択する(Activate, Select)
セルをアクティブにする・選択する 【書式:セルをアクティブにする】 object …

