Здравствуйте участники форума. При нажатии правой кнопки мышки (ПКМ) в выпадающем меню есть возможность "Выбрать из раскрывающегося списка...". Вопрос возможно ли эту процедуру вызвать макросом? Активируем ячейку и сразу открылся раскрывающийся список, если возможно напишите пожалуйста код. На мой взгляд это удобно, при вводе в столбец новых данных самостоятельно пополняется выпадающий список из уникальных значений столбца. Если будет выпадать список при активации ячейки, сразу будет видно что нужно выбрать из него. В поиске по тексту "Выбрать из раскрывающегося списка..." находит темы про создание и работа с Выпадающими списками. Надежда только на вас Уважаемые участники форума.
Здравствуйте участники форума. При нажатии правой кнопки мышки (ПКМ) в выпадающем меню есть возможность "Выбрать из раскрывающегося списка...". Вопрос возможно ли эту процедуру вызвать макросом? Активируем ячейку и сразу открылся раскрывающийся список, если возможно напишите пожалуйста код. На мой взгляд это удобно, при вводе в столбец новых данных самостоятельно пополняется выпадающий список из уникальных значений столбца. Если будет выпадать список при активации ячейки, сразу будет видно что нужно выбрать из него. В поиске по тексту "Выбрать из раскрывающегося списка..." находит темы про создание и работа с Выпадающими списками. Надежда только на вас Уважаемые участники форума.gling
ЯД-41001506838083
Сообщение отредактировал gling - Четверг, 18.09.2014, 20:51
Вы имеете ввиду заставить пользователя открывать этот список через ПКМ, или создать базу для выпадающего списка без защиты для ввода новых данных, а так же написать макрос для добавления данных в базу, удаления дубликатов, сортировки данных? Excel уже все это делает, нужно вызвать только список, который создался из данных этого столбца. Это тоже стандартные функции Excel.
Вы имеете ввиду заставить пользователя открывать этот список через ПКМ, или создать базу для выпадающего списка без защиты для ввода новых данных, а так же написать макрос для добавления данных в базу, удаления дубликатов, сортировки данных? Excel уже все это делает, нужно вызвать только список, который создался из данных этого столбца. Это тоже стандартные функции Excel.gling
интересно получилось, но я бы вызывал список клавиатурой... т.к. в таком виде макрос мешает ходить по таблице и возможны не произвольные изменения значения.....
интересно получилось, но я бы вызывал список клавиатурой... т.к. в таком виде макрос мешает ходить по таблице и возможны не произвольные изменения значения.....mikaelw
Чтобы не испортить что введено можно записать так [vba]
Код
If Not Intersect(Target, Range(Cells(Range("A1").CurrentRegion.Rows.Count + 1, 1), Cells(100, 1))) Is Nothing Then Application.SendKeys "%{DOWN}" End If
[/vba] Или так [vba]
Код
If Target <> "" Then Exit Sub If Not Intersect(Target, Range("A1:A100")) Is Nothing Then Application.SendKeys "%{DOWN}" End If
[/vba]
Чтобы не испортить что введено можно записать так [vba]
Код
If Not Intersect(Target, Range(Cells(Range("A1").CurrentRegion.Rows.Count + 1, 1), Cells(100, 1))) Is Nothing Then Application.SendKeys "%{DOWN}" End If
[/vba] Или так [vba]
Код
If Target <> "" Then Exit Sub If Not Intersect(Target, Range("A1:A100")) Is Nothing Then Application.SendKeys "%{DOWN}" End If