Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
22455 / 76738 ←次へ　｜　前へ→
【59665】Re:定義済の関数は使えない？(引き続き質問させてください。)
回答  甘木  - 08/12/30(火) 22:46 -
引用なし
パスワード
   ▼nagao さん：
>ただVLOOKUPの戻り値がうまく使えなく四苦八苦
>しています。整理してから再度質問させて下さい。
先走るようで恐縮ですが、エラー対応ということはわかっていますので、
少し書いてみます。

すでに別案が示されていますが、Vlookupというワークシート関数を
使う前提でエラー対応の仕方を書いてみます。

Function time_to_data1(Id As Integer, Data_Range As Range, Line As Integer)
　Dim return_val
　
　On Error Resume Next
　return_val = Application.WorksheetFunction.VLookup(Id, Data_Range, Line, False)
　On Error GoTo 0
　
　If IsEmpty(return_val) Then
　　time_to_data1 = 0
　Else
　　time_to_data1 = return_val
　End If

End Function

なお、一般機能であれば、下記のように書くところです。
E1セル
=IF(ISERROR(VLOOKUP(D1,$A$1:$B$3,2,FALSE)),0,
　　VLOOKUP(D1,$A$1:$B$3,2,FALSE))
0 hits
▼ 【59657】こういうユーザー定義関数(Function)は作れますか？ nagao 08/12/30(火) 3:28 質問
【59658】Re:こういうユーザー定義関数(Function)は... 甘木 08/12/30(火) 6:27 回答
【59659】Re:こういうユーザー定義関数(Function)は... nagao 08/12/30(火) 9:02 お礼
【59660】Re:こういうユーザー定義関数(Function)は... 甘木 08/12/30(火) 9:44 発言
【59661】定義済の関数は使えない？(引き続き質問さ... nagao 08/12/30(火) 15:42 質問
【59662】Re:定義済の関数は使えない？(引き続き質問... かみちゃん 08/12/30(火) 15:48 発言
【59663】Re:定義済の関数は使えない？(引き続き質問... nagao 08/12/30(火) 17:38 お礼
【59664】Re:定義済の関数は使えない？(引き続き質問... SS 08/12/30(火) 18:20 発言
【59665】Re:定義済の関数は使えない？(引き続き質問... 甘木 08/12/30(火) 22:46 回答≪
【59666】Re:定義済の関数は使えない？(引き続き質問... かみちゃん 08/12/30(火) 22:57 発言
【59667】Re:定義済の関数は使えない？(引き続き質問... 甘木 08/12/30(火) 23:28 発言
【59668】Re:定義済の関数は使えない？(引き続き質問... かみちゃん 08/12/30(火) 23:39 発言
【59669】Re:定義済の関数は使えない？(引き続き質問... 甘木 08/12/30(火) 23:58 発言
【59670】Re:定義済の関数は使えない？(引き続き質問... かみちゃん 08/12/31(水) 0:04 発言
【59671】Re:定義済の関数は使えない？(引き続き質問... 甘木 08/12/31(水) 1:24 発言
【59672】Re:定義済の関数は使えない？(引き続き質問... かみちゃん 08/12/31(水) 10:50 発言
【59673】「#NUM!」が出る? nagao 08/12/31(水) 10:55 質問
【59674】Re:「#NUM!」が出る? かみちゃん 08/12/31(水) 11:09 発言
【59675】Re:「#NUM!」が出る? ぱくぱく名無しさん 08/12/31(水) 11:14 発言
【59676】Re:「#NUM!」が出る? nagao 08/12/31(水) 11:37 お礼
【59678】Re:「#NUM!」が出る? かみちゃん 08/12/31(水) 11:39 発言
【59679】Re:「#NUM!」が出る? nagao 08/12/31(水) 11:59 お礼
【59686】Re:「#NUM!」が出る? ぱくぱく名無しさん 09/1/2(金) 13:34 発言
【59677】Re:「#NUM!」が出る? かみちゃん 08/12/31(水) 11:37 発言
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
22455 / 76738 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free