Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9941 / 13658 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【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"&Ｚ軸２).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" & Ｚ軸２).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" & Ｚ軸２).Value = MyV
>End If
>
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9941 / 13658 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free