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 コメントをキャンセル

関連記事

: 数式を設定・取得する（Formula プロパティ・FormulaR1C1 プロパティ）

Formula プロパティ（FormulaR1C1 プロパティ） Formula …

: ２つ以上のセル範囲を１つにまとめて参照（Union メソッド）

Union メソッド Union メソッドは、２つ以上のセル範囲を１つにまとめて …

: オートフィルタ（日付フィルタ）AutoFilter メソッド

日付フィルタを使用してレコードを抽出する Excel 2007 から「日付フィル …

: グラデーション（Pattern プロパティ・Gradient プロパティ）

セルの背景ににグラデーションを設定する Pattern プロパティを使用するとセ …

: 任意のセルを含む行または列全体を参照（EntireRow プロパティ,EntireColumn プロパティ）

EntireRow プロパティ・EntireColumn プロパティ Entir …

: 文字列の横位置を取得・設定する（HorizontalAlignment プロパティ）

HorizontalAlignment プロパティ HorizontalAlig …

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

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

: 対象のセルを直接参照しているセル全てを取得（DirectDependents プロパティ）

DirectDependents プロパティ DirectDependents …

: セルの値を置換・書式設定（Replace メソッド,ReplaceFormat プロパティ）

セルの値の置換と書式設定検索条件に一致するセルの書式を設定するには、まず、Ap …

: 指定した行数・列数移動したセル・セル範囲を参照（Offset プロパティ）

Offset プロパティ Offset プロパティは、基準となるセル・セル範囲か …

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