Простая пользовательская функция в Excel с использованием Vlookup

Question

Я хочу ускорить процесс поиска перекрестных ссылок.

Сейчас я использую VLOOKUP, и он отлично работает - но требуется время, когда это нужно делать несколько раз в день.

Это всегда один и тот же лист, который я использую для поиска перекрестных ссылок, поэтому единственное, что меняется, - это мое входное значение в функции VLOOKUP.

Поэтому я хочу, чтобы функция, в которую я только вводил 1 значение, получала значение VLOOKUP.

Идея представляет собой такую ​​функцию, как:

=CROSS(ID)

, где

CROSS = vlookup(ID, table_array, col_index_num,[range_lookup])

Таким образом, vlookup_value заменяется на ID.

Надеюсь, вы можете дать мне несколько ответов - заранее спасибо.

Я пробовал несколько разных вещей, но безуспешно. Поскольку я новичок, я гуглил и записывал макросы, чтобы искать ответы.

Answer 1

Я получил это работает, как и сейчас!

Код закончился так:

Sub crossref()

Option Explicit

Public Function CROSS(ID As Variant) As Variant
CROSS = Application.WorksheetFunction.VLookup(ID, Worksheets("Sheet1").Range("E:F"), 2, 0)

End Function

Answer 2

Вы можете написать UDF (пользовательскую функцию) для этого, используя метод WorksheetFunction.VLookup :

Option Explicit

Public Function CROSS(ID As Variant) As Variant

    CROSS = Application.WorksheetFunction.VLookup(ID, table_array, col_index_num, range_lookup)

End Function