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ソース実行前
実行後
関連記事
-
-
オートフィルタ(抽出条件で使用できる演算子・記号)AutoFilter メソッド
AutoFilter メソッド 【書式】 object.AutoFilter ( …
-
-
ハイパーリンク(Hyperlink オブジェクト)
Hyperlink オブジェクト Hyperlinks コレクション のメンバー …
-
-
指定したセルへ移動(Goto メソッド)
指定したセルへ移動 指定したシートの指定したセルへジャンプするには、Goto メ …
-
-
外枠罫線の設定(BorderAround メソッド)
外枠罫線の設定 罫線の設定には、Borders プロパティを使用しますが、範囲内 …
-
-
セルを挿入する(Insert メソッド)
Insert メソッド Insert メソッドで、指定した場所に新規の空白セルを …
-
-
入力規則(他セルや数式を利用して許容値を設定)Validation オブジェクト
他のセルや数式を利用して許容値を設定する 入力規則(その5) での設定を、マクロ …
-
-
列名を取得、列番号を取得(Address プロパティ,Column プロパティ)
列番号を取得する セル番地(「A1」や「B3」)や列名(「A」「B」「C」 …
-
-
次の検索(FindNext メソッド,FindPrevious メソッド)
FindNext メソッド Find メソッドで開始された検索を継続します。引数 …
-
-
セルに値を設定する・セルの値を参照する(Value プロパティ)
Value プロパティ Value プロパティは、セルの値を取得したり、値を設定 …
-
-
任意の行または列を参照(Rows プロパティ,Columns プロパティ)
Rows プロパティ・Columns プロパティ Rows プロパティは、オブジ …

