|
おはようございます。
>久しぶりに必要にかられてVBAを利用することになりました。
>Excel 2002 SP3を利用しています
>
>次のようにセル(2,18)にVlookup関数を利用してセル(M2)の値
>を
>物品.xlsの中に名前(集中)の中から2列目の値を選択させて
>います
>
> Cells(2, 18).Formula = "= VLookup(M2, 物品.xls!集中, 2,
>False)"
>
>選択はできています
>セル(M2)の値がみつかれば例えばその値が出ています
>今回は"○"を表示させています
>みつからない場合は、#N/Aとエラー表示されます
R2は、上記のような数式だとして・・、
>さて、ここで、このCells(2,18)にカーソルを持っていき
>その値をhantei( Dim hantei As Variant)という変数に
>入れようと思い下記のように記載しています
>
Range("R2").Select ’これが必要ないかもしれませんよ
hantei = IsError(Range("R2").Value) 'True エラー False エラーでない
としてみて下さい。
Selectは、Trueを返しますからね・・・
|
|