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

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

2015/06/20

DirectPrecedents プロパティ

DirectPrecedents プロパティは、対象のセルが直接参照しているすべてのセル・セル範囲（Range オブジェクト）を返します。複数のセル範囲の参照元があるときは、複数選択範囲 (Range オブジェクトの集合) を返します。

【書式】

Object.DirectPrecedents

引数・戻り値

object ・・・対象となる Range オブジェクト

DirectPrecedents プロパティの使用例

サンプルVBAソース

　
Sub Sample_DirectPrecedents()

    '「J4」には、数式「 =SUM(F10:F15) 」が入力されている
    '「I5」には、数式「 =I4/$L$4 」が入力されている

    MsgBox "「J4」セルの参照先（直接）：" & Range("J4").DirectPrecedents.Address & Chr(13) & _
           "「I5」セルの参照先（直接）：" & Range("I5").DirectPrecedents.Address
        

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

　

Sub Sample_DirectPrecedents()

'「J4」には、数式「 =SUM(F10:F15) 」が入力されている

'「I5」には、数式「 =I4/$L$4 」が入力されている

MsgBox "「J4」セルの参照先（直接）：" & Range("J4").DirectPrecedents.Address & Chr(13) & _

"「I5」セルの参照先（直接）：" & Range("I5").DirectPrecedents.Address

End Sub

　

実行結果

- セルの操作 DirectPrecedents プロパティ, Range オブジェクト, VBA基本, エクセルVBA, セルの操作, 参照元

Tweet

Message コメントをキャンセル

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

関連記事

: セルが結合セルの一部である場合、その結合セルの範囲を取得（MergeArea プロパティ）

MergeArea プロパティ MergeArea プロパティは、指定したセルが …

: オートフィルタ（色で抽出する）AutoFilter メソッド

オートフィルタ（色で抽出する）フォントの色、セルの背景色（条件付き書式による設 …

: 列名を取得、列番号を取得（Address プロパティ,Column プロパティ）

列番号を取得するセル番地（「A1」や「B3」）や列名（「A」「B」「C」&#8 …

: ハイパーリンク（Hyperlinks オブジェクト）

Hyperlinks オブジェクトワークシートまたはセル範囲のワークシートコレ …

: セルのロック（Locked プロパティ）

セルのロック（Locked プロパティ） Locked プロパティで、セルのロッ …

: VBA で、ワークシート関数を使用（WorksheetFunction プロパティ）

VBA で、ワークシと関数を使用 VBA から、ワークシート関数を呼び出す場合、 …

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

無効値を入力時に、エラーメッセージの表示 Validation.ShowErro …

: 終端セルを参照する（End プロパティ）

End プロパティ End プロパティは、基準となるセルが含まれる領域の指定した …

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

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

: オートフィルタの設定と解除（AutoFilter メソッド）

AutoFilter メソッドオートフィルタを設定する場合、AutoFilte …

PREV: 対象のセルが配列数式の一部かどうか（HasArray プロパティ）
NEXT: 対象のセルが参照している全てのセルを取得（Precedents プロパティ）