Excel2016 VBAでINDIRECTを使いたい

Question

前提・実現したいこと

表記のとおりです。

発生している問題・エラーメッセージ

worksheetfunction.を頭に付けて記述しているのですが、
「オブジェクトは、このプロパティまたはメソッドをサポートしていません」と表示されます。

該当のソースコード

num = WorksheetFunction.Indirect("A" & 2).Value
(indirectの中身は仮のものです)

Answer 1

Application.WorksheetFunction は、すべての Excel 関数を提供してくれるわけではありません。

Excel のヘルプ にあるメソッドしか提供していません。この中に indirect はありませんから、この方法では呼び出すことはできません。

---

そもそも indirect とは何をする関数でしょうか？
これも Excel のヘルプですが、その意味は

関数の引数で示されたセルを参照し、その中身で示されたセルの値を返す

ものです。
つまり例えば A2 セルに書かれている内容が B3 だとしたら、INDIRECT(A2) は、B3 セルの内容を返します。

これを VBA でやればいいのです。あるセルの内容は Range(セル指定).Value で得られますから、その内容をさらに Range(あるセルの内容）.Value とすれば INDIRECT と同じですよね？
※Cells では行と列を指定する必要がありますが、Range なら "A2" といった記述ができるので楽

そう、INDIRECT 関数は不要だからメソッドとして提供していないのです。同じ事が VBA で実現できるのですから。

Comments

[ats1]

ご回答ありがとうございました。
確かに、別の方法があるので不要なメソッドは提供しないはずですよね。
勉強させていただきました。

Answer 2

Evaluateメソッドの存在を知りました。ありがとうございました。