Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

55548 / 76732

←次へ　｜　前へ→


	【25957】Re:vlookup の書式に関して

かみちゃん - 05/6/20(月) 7:03 -


	引用なし

	パスワード

こんにちは。かみちゃん　です。

>　 With Range("a2", Range("a2000").End(xlUp)).Offset(0, 10).Resize(, 3)
>　　　　ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-5],納入場所データ!C[-10]:C[-9],2,0)"
>　　End With
>これは、現在のシートのF列の数値を納入場所データとゆう
>ワークシートより検索し、現在のシートのＫ列に貼り付けたいと
>ゆう意味で作ったのですが、どうしてもＡ１のセルに結果が貼り付けられます。
>しかもIR1のデータをIM:INより検索になってしまいます。

ActiveCell プロパティのヘルプを見ると「単一セル」と書かれていますから、
A1（こちらで確認すると、A2でしたが）に数式が設定されていると思います。
あと、Resize(, 3)が何をしようとしているのかわかりません。

そこで、次のような感じでできるのではないかと思います。
With Range("a2", Range("a2000").End(xlUp)).Offset(0, 10)
　.FormulaR1C1 = "=VLOOKUP(RC[-5],C[-10]:C[-9],2,0)"
End With

0 hits

▼

【25955】vlookup の書式に関して たま 05/6/20(月) 0:06