Из функции Выбор пользов функцию

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Из функции Выбор пользов функцию (Макросы/Sub)

Otter

Дата: Вторник, 05.05.2015, 12:26 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 174

Репутация: 0 ±

Замечаний: 0% ±

Excel 2019, Word 2019

Доброго дня всем.
Не могу сделать из функции Выбор свою пользовательскую функцию ДеньНедПнд. В чем причина?

К сообщению приложен файл: 25_.xlsm (15.3 Kb)

Ответить

_Boroda_

Дата: Вторник, 05.05.2015, 12:38 | Сообщение № 2

Группа: Модераторы

Ранг: Местный житель

Сообщений: 16675

Репутация: 6481 ±

Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS

Уберите Апликейшны
[vba]

Код

Function ДеньНедПнд(Ячейка)
       ДеньНедПнд = WorksheetFunction.Choose _
        (WorksheetFunction.Weekday(Ячейка, 2), _
        "Пнд", "Втр", "Срд", "Чтв", "Птн", "Сбт", "Вскр")
End Function

[/vba]
А почему? А потому, что они не так пишутся (не Applicaton, а Application). Да и не так уж и обязательны они здесь.

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995