Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Добавление кнопки пользовательской функции на панель быстрого доступа
 
#1
06.10.2021 13:03:56
Добрый день! Очень нужно мне вытащить кнопку пользовательской функции на панель. Макросы вытащила. А с Function не знаю. Помогите.
Заранее благодарна.
 
 
 
#2
06.10.2021 14:18:50
Что возвращает эта функция, какие у нее параметры?
Владимир
 
 
 
#3
06.10.2021 14:31:50
Находится во вставке функций Определенные пользователем VLOOKUP
 
 
 
#4
06.10.2021 14:47:11
Опишите подробнее, что Вы хотите сделать. Добавить кнопку на панель быстрого действия? Какие действия будут производиться при нажатии кнопки?
Владимир
 
 
 
#5
06.10.2021 15:13:43
Выполняет роль ВПР
 
 
 
#6
06.10.2021 15:26:32
так бы сразу и сказали так гораздо понятнее)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
 
 
#7
06.10.2021 15:45:53
Как мне вынести на панель?
 
 
 
#8
06.10.2021 15:48:26
Функцию, насколько я помню, на панель вывести нельзя (не такое у нее воспитание) :)
Можно процедуру, которая будет вставлять функцию (и даже пользовательскую) в активную ячейку, например.
Кому решение нужно - тот пример и рисует.
 
 
 
#9
06.10.2021 16:43:26
Где эта процедура? Так хочется, чтобы эта функция была под рукой
 
 
 
#10
06.10.2021 16:53:30
какой результат с помощью какой функции вы пытаетесь получить?
ситуацию опишите
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
 
 
#11
06.10.2021 16:55:02
kristina S, процедуру надо написать.
Ну вот формулу =СУММ() нельзя на панель вывести? Нельзя. И пользовательскую функцию - нельзя.
Кому решение нужно - тот пример и рисует.
 
 
 
#12
06.10.2021 17:30:46
Как бы...Можно сделать имитацию. Создаете процедуру:
Код
?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Public sFuncName$ 'нужна, чтобы задавать значение имени функции
Sub Write_Func()
    Dim oActCell As Range
    Dim sFrml$
    Dim bDlgRes As Boolean
 
    Set oActCell = ActiveCell
    On Error Resume Next
    sFrml = oActCell.Formula
    oActCell.Formula = "=" & sFuncName & "()"
    bDlgRes = Application.Dialogs(450).Show 'xlDialogFunctionWizard
    If (bDlgRes = False) Then oActCell.Formula = sFrml
    If Err.Number <> 0 Then
        MsgBox "Ячейка защищена или находится в режиме редактирования", vbInformation, "www.excel-vba.ru"
    End If
End Sub

А уже макросом, назначенным на кнопку панели вызываете, указывая имя функции:
Код
?
1
2
3
4
Sub test()
    sFuncName = "СУММ"
    Call Write_Func
End Sub
СУММ указана для примера, чтобы можно было потестировать.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
 
 
#13
06.10.2021 17:40:44
ТС хотела, чтобы подсказали куда тыкнуть мышкой в меню Excel, а вы тут макросы...
 
 
 
#14
06.10.2021 17:46:10
Цитата
New написал:
хотела, чтобы подсказали куда тыкнуть мышкой в меню Excel,
возможно. Но так нельзя, насколько я знаю. Да и речь-то про
Цитата
kristina S написал:
кнопку пользовательской функции
значит понятие макросов все же присутствует :)
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
 
 
#15
07.10.2021 11:05:47
Добрый день! Спасибо Вам за помощь. Всегда здесь помогут. Умные и красивые.
 
 
 
Страницы: 1
Читают тему
Loading...