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ソース実行前
実行後
関連記事
-
-
セルの幅・高さの自動調整(AutoFit メソッド)
AutoFit メソッド AutoFit メソッドは、指定したセル・セル範囲(R …
-
-
対象のセルが参照している全てのセルを取得(Precedents プロパティ)
Precedents プロパティ Precedents プロパティは、対象のセル …
-
-
セルを参照する(Range プロパティ)
Range プロパティ 任意のセルにアクセスするには Range プロパティを使 …
-
-
セル内の編集を禁止する(EditDirectlyInCell プロパティ)
EditDirectlyInCell プロパティ エクセルでは、セルをダブルクリ …
-
-
文字列を縮小して全体を表示(ShrinkToFit プロパティ)
ShrinkToFit プロパティ ShrinkToFit プロパティは、セルに …
-
-
指定したセルへ移動(Goto メソッド)
指定したセルへ移動 指定したシートの指定したセルへジャンプするには、Goto メ …
-
-
連続データを入力する(AutoFill メソッド)
AutoFill メソッド Excel で、連続するデータを入力する「オートフィ …
-
-
行の高さを取得・設定・する(RowHeight プロパティ)
RowHeight プロパティ RowHeight プロパティは、対象セルの高さ …
-
-
オートフィルタ(色で抽出する)AutoFilter メソッド
オートフィルタ(色で抽出する) フォントの色、セルの背景色(条件付き書式による設 …
-
-
AutoFilter オブジェクト(メソッド・プロパティ)
AutoFilter.ShowAllData メソッド AutoFilter.S …

