式を持ち、別のセルに貼り付けたセルから値を抽出します。

Question

Sheet1のAI31セルからAI31セルの値を抽出して、その値をSheet3のC2に貼り付けようとしました。

Sheets("Sheet1").Evaluate(Range("AI31").Formula).Copy Destination:=Sheets("Sheet3").Range("C2") 

それは（VBA）を動作しません。しかし

すべてのヘルプは

Answer 1

あなたのコードが必要以上に洗練されていただければ幸いです。

Worksheets("Sheet3").Range("C2").Value = Worksheets("Sheet1").Range("AL31").Value 

.Valueのは、Rangeオブジェクトのデフォルトプロパティであるとして、あなたはそれを省略することができ、それにもかかわらず、私は私のマクロでそれを入力するのが好きです。