Excel VBA質問箱 IV

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

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


9927 / 13644 ツリー ←次へ | 前へ→

【24715】#VALUE!を消したいのですが・・・ k.k 05/5/5(木) 19:50 質問[未読]
【24716】Re:#VALUE!を消したいのですが・・・ Kein 05/5/5(木) 20:57 回答[未読]
【24717】Re:#VALUE!を消したいのですが・・・ k.k 05/5/5(木) 21:20 お礼[未読]

【24715】#VALUE!を消したいのですが・・・
質問  k.k  - 05/5/5(木) 19:50 -

引用なし
パスワード
   VBAでVLOOKUPを使用後、#VALUE!という文字が出ます。この文字の部分だけ空白にしたいのですが、どうすればいいか分かりません・・・。


RANGE("A"&Z軸2).VALUE = APPLICATION.VLOOKUP(品番,範囲,2,0)

よろしくお願いします

【24716】Re:#VALUE!を消したいのですが・・・
回答  Kein  - 05/5/5(木) 20:57 -

引用なし
パスワード
   数式の戻り値を、いったんVariant型の変数に格納して判定します。

Dim MyV As Variant

MyV = Application.VlookUp(品番, 範囲, 2, 0)
If Not IsError(MyV) Then
  Range("A" & Z軸2).Value = MyV
End If
 

【24717】Re:#VALUE!を消したいのですが・・・
お礼  k.k  - 05/5/5(木) 21:20 -

引用なし
パスワード
   できました!
まだ初心者でいろいろ調べていたんですが、全然分からず困っていました。
本当にありがとうございました!

▼Kein さん:
>数式の戻り値を、いったんVariant型の変数に格納して判定します。
>
>Dim MyV As Variant
>
>MyV = Application.VlookUp(品番, 範囲, 2, 0)
>If Not IsError(MyV) Then
>  Range("A" & Z軸2).Value = MyV
>End If
>

9927 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free