Excel 2016 UDF не отображается - PullRequest
0 голосов
/ 27 октября 2018

Я взял курс VBA с веб-сайта Excel для бизнеса и создал пользовательскую функцию под названием ULookup.Функция отлично работает в электронной таблице, и если я использую знак =, появится Ulookup.Однако Control-Shift-A не отображает подсказки о полном заполнении, как это происходит на ПК, и если я перехожу в меню функций вставки, функция вообще не отображается.Это ошибка в версии Excel для Mac или я что-то упустил?Вот код, который я вставил в Модуль 1 моей Рабочей книги:

Option Base 1

Function ULookup(lookup_value As Range, lookup_range As Range, source_range As Range, Optional match_type As Integer = 0) As Variant()
' Performs an Index / Match Lookup.
Dim results_Array() As Variant
Dim lookup_index As Long
ReDim results_Array(1) As Variant

' Consider defining this as an array function

' Dim lookup_value ' Contains the value I want to find

' Dim lookup_range ' Range to search in

' Dim source_range ' Pull corresponding value from

' Dim match_type   ' Consider the type of match to perform, exact, lesser, greater


' Find lookup_value in lookup range
lookup_index = Application.WorksheetFunction.Match(lookup_value, lookup_range, match_type)


' Determine if lookup value was in the range.

' Get corresponding value from source range
results_Array(1) = WorksheetFunction.Index(source_range, lookup_index)

' Do not edit code beyond this comment
ULookup = results_Array

End Function
...