|
▼りの さん:
>(リスト)の範囲は、(番号)の範囲まで広げて定義をかけています。
>この場合、リストは貼り付けたい別シートにあるんですが
>如何したら良いんでしょうか?
>>=VLOOKUP($A$1,リスト,2,1)
問題ありません。ちゃんと参照できるはずです。
関数、間違ってました。スイマセン
=VLOOKUP($A$1,リスト,2,0) ですね。
新規Bookで下記のSampleでサンプルデータを作成して、
2枚目のWorkSheet A1セルの値を変更してみてください。
Sub Sample()
With Worksheets(1)
.Range("A1:C1").Value = Array(1, "B1", "C1")
.Range("A1:C1").AutoFill .Range("A1:C15")
.Range("A1:C15").Name = "リスト"
End With
With Worksheets(2)
.Range("A1").Value = 1
.Range("B2").Formula = "=VLOOKUP($A$1,リスト,2,0)"
.Range("C3").Formula = "=VLOOKUP($A$1,リスト,3,0)"
End With
End Sub
|
|