Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

配列数式を取得または設定する（FormulaArray プロパティ）

2015/06/18 2015/06/19

FormulaArray プロパティ

FormulaArray プロパティは、対象のセル・セル範囲の配列数式（１つの数式または配列）を取得または設定します。指定したセル範囲に配列数式が含まれていないときは、Null 値を返します。
設定する値は、バリアント型（内部処理形式：String [文字列型] ）を指定し、かならず、“” で囲みます。

【書式】

＜取得＞
result = Object.FormulaArray

＜設定＞
Object.FormulaArray = formula

引数・戻り値

object ・・・対象となる Range オブジェクト
formula ・・・数式を表す文字列を指定
result ・・・取得した数式を表す文字列

FormulaArray プロパティの文字数は 255 に制限されています。

セルに通常の数式が入力されている場合は、その数式を取得します。通常の数式が入力されているのか、配列数式が入力されているのかは、HasArray プロパティで調べることができます。

ヘルプには、「配列数式として入力するときは、数式には R1C1 形式を使う必要があります。A1 形式は使えません。」と記されていますが、とりあえず、Excel 2013 では、どちらも使用できるようです（FormulaArray プロパティの使用例）。

FormulaArray プロパティの使用例

サンプルVBAソース

　
Sub Sample_FormulaArray()

    
    '配列数式を入力
    
    'Num が偶数である値の合計値を求める（AI形式で入力）
    Range("C9").FormulaArray = "=SUM(IF(MOD(B3:B8,2)=0,C3:C8,""""))"
    
    'Num が奇数である値の合計値を求める（R1C1形式で入力）
    Range("C10").FormulaArray = "=SUM(IF(MOD(R3C2:R8C2,2)=1,R3C3:R8C3,""""))"
    
    
    
    '配列数式を入力
    Range("F2:H8").FormulaArray = "=SUM(R3C3:R8C3)"


    '配列数式かどうかを確認し、配列数式である場合はその数式を表示
    If Range("F2").HasArray = True Then
    
        MsgBox Range("F2").FormulaArray
    
    End If
    
    
End Sub

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

27

28

　

Sub Sample_FormulaArray()

'配列数式を入力

'Num が偶数である値の合計値を求める（AI形式で入力）

Range("C9").FormulaArray = "=SUM(IF(MOD(B3:B8,2)=0,C3:C8,""""))"

'Num が奇数である値の合計値を求める（R1C1形式で入力）

Range("C10").FormulaArray = "=SUM(IF(MOD(R3C2:R8C2,2)=1,R3C3:R8C3,""""))"

'配列数式を入力

Range("F2:H8").FormulaArray = "=SUM(R3C3:R8C3)"

'配列数式かどうかを確認し、配列数式である場合はその数式を表示

If Range("F2").HasArray = True Then

MsgBox Range("F2").FormulaArray

End If

End Sub

　

実行結果

実行前

実行後

- セルの操作 FormulaArray プロパティ, HasArray プロパティ, Range オブジェクト, VBA基本, エクセルVBA, セルの操作, 配列数式

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: オートフィルタ（矢印を非表示にする）AutoFilter メソッド

AutoFilter メソッド【書式】 object.AutoFilter ( …

: アクティブなセルを参照する（ActiveCell プロパティ）

ActiveCell プロパティ ActiveCell プロパティは、各ウィンド …

: フリガナの設定（Characters プロパティ,PhoneticCharacters メソッド）

Characters プロパティ Characters プロパティは、文字範囲を …

: 文字の向きを表す値を取得・設定する（Orientation プロパティ）

Orientation プロパティ Orientation プロパティで、文字列 …

: 行の高さを取得・設定・する（RowHeight プロパティ）

RowHeight プロパティ RowHeight プロパティは、対象セルの高さ …

: 並べ替え（Sort オブジェクト, SortFields コレクション）

Sort オブジェクトによる並べ替え Excel 2007 以降のバージョンでの …

: オートフィルタ（抽出件数の取得・結果集計）AutoFilter メソッド

ワークシート関数の Subtotal 関数の使い方 VBA には、オートフィル …

: セルの値を置換（Replace メソッド）

Replace メソッド任意のセル範囲内から特定の値を一括して置換します。Fi …

: フリガナの設定（SetPhonetic メソッド）

フリガナの設定（SetPhonetic メソッド） SetPhonetic メソ …

: 入力規則（入力時メッセージの設定）Validation オブジェクト

入力規則の入力時メッセージを表示する Validation.ShowInput …

PREV: A1参照形式、R1C1参照形式の設定・取得（ReferenceStyle プロパティ）
NEXT: 対象のセルが配列数式の一部かどうか（HasArray プロパティ）