VLOOKUPコードに基づいてデータを入力していますが、エラーが発生し続けます。アプリケーションVLOOKUP no value
For Each Cell In Rng
Cell.Offset(0, 2).Value = Application.WorksheetFunction.VLookup(Cell, Table2, 1, False)
Next
私は列Cは、VLOOKUP値を投稿したり、メッセージ「戻された項目スキャンされません」を返すようにどちらかたい。私はこれを行うにはエラーハンドラを使用していましたが、この実行時にエラーが発生し続けます。
'MyErrorHandler:
' If Err.Number = 1004 Then
' Cell.Offset(0, 2).Value = "Returned Item Not Scanned"
' ElseIf Err.Number = 13 Then
' MsgBox "Incorrect Exceptions Data."
' Else
'
' End If
エラーは、 'WorksheetFunctionクラスのVLookupプロパティを取得できません。
誰でも手助けできますか?
私はこれを手動で行う場合の式はこれで追加するのを忘れ - = IFERROR(VLOOKUP(A3、「311Aデータ '!A:A、1、FALSE)、 "返されたアイテムはスキャンされません" –
まず、 'Table1'とは何ですか? - 第二にあなたは間違った数式を使用しています。 '= VLOOKUP()'ではなく '= MATCH()'を使用します –
表1は '311A Data'の範囲ですA:A –