хочу список в каждой ячейке!

Программирование на Visual Basic for Applications
Юля
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 12.04.2004 (Пн) 15:11
Откуда: Санкт-Петербург

хочу список в каждой ячейке!

Сообщение Юля » 12.04.2004 (Пн) 15:24

Здравствуйте! Помогите. Не могу вспомнить.
На отдельном листе екселя список. Мне нужно на другом листе вводить в ячейки конкретного столбца значения из этого списка. Т.е. получается, что в каждой ячейке я хочу видеть поле со списком со значениями, и уже не вводить ручками, а выбирать. Похожая штука есть, если нажать правой кнопкой мыши появляется предложение Выбрать из списка. Но значения в этом списке только из столбца на котором стоишь. Вот. Надеюсь понятно объяснила. Спасибо. Юля.

gummisen
Начинающий
Начинающий
 
Сообщения: 2
Зарегистрирован: 13.04.2004 (Вт) 7:24

Сообщение gummisen » 13.04.2004 (Вт) 7:46

Для начала списку значений надо присвоить имя. Для этого выделяем диапазон значений и идем в меню:
Вставка -> Имя -> Присвоить
В поле Имя забиваем имя для диапазона значений
Первый пункт выполнен.

Далее переходим на нужный нам лист. Выделяем диапазон в котором мы хотим выбирать значения из списка и снова в менюю
Данные -> Проверка
На вкладке Параметры выбираем Тип данных -> Список, а в поле Источник пишем "=ИМЯ_ПРИСВОЕННОЕ_ДИАПАЗОНУ_ЗНАЧЕНИЙ"
(без кавычек!!!)
ВСЕ!
Зы: проверялось в Excel 2002 =)

Юля
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 12.04.2004 (Пн) 15:11
Откуда: Санкт-Петербург

Сообщение Юля » 13.04.2004 (Вт) 12:34

Gummisenchik Спасибо! Очень помог. С проверкой догадалась сама, а вот с другого листа никак не хотел брать. Оказывается все связано с именами...
:D

gummisen
Начинающий
Начинающий
 
Сообщения: 2
Зарегистрирован: 13.04.2004 (Вт) 7:24

Сообщение gummisen » 13.04.2004 (Вт) 13:39

Юля =)
На здоровье =)

Calvin
Постоялец
Постоялец
 
Сообщения: 409
Зарегистрирован: 21.01.2003 (Вт) 12:13
Откуда: Sebastopol

Сообщение Calvin » 28.04.2004 (Ср) 16:29

а нельзя ли в этот список программно добавлять значения....допустим как вобычный список? вот код для списка (\данные\проверка):
Код: Выделить всё
perem=array("1","2","3","4")
for i=1 to UBound(perem)
     With Selection.Validation
        .Delete ' при отображении списка требует очистку предыдущих данных
         .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:=
         xlBetween, Formula1:=perem(i)
next

хотя, .Delete в этом цикле не нужен, но без него ругается....
в общем у меня не получается хифига..........а было бы неплохо :roll:
-Whose the motocycle, is this? -It`s a chopper, baby! -Whose chopper is this? -Zed`s! -Who is Zed? -Zed`s dead, baby, Zed`s dead! :-D

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 29.04.2004 (Чт) 8:48

Selection.Validation.Delete
Selection.Validation.Add xlValidateList, xlValidAlertStop, , "1,2,3,4,5"
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Calvin
Постоялец
Постоялец
 
Сообщения: 409
Зарегистрирован: 21.01.2003 (Вт) 12:13
Откуда: Sebastopol

Сообщение Calvin » 29.04.2004 (Чт) 9:45

2 GSerg спасибо, работает. вот смотрю ты опустил один аргумент (Operator:= xlBetween). А как быть, если в список будут добавляться не числа, как в предыдущем примере, а текстовые переменные, СОДЕРЖАЩИЕ ЗАПЯТУЮ :wink: ???
-Whose the motocycle, is this? -It`s a chopper, baby! -Whose chopper is this? -Zed`s! -Who is Zed? -Zed`s dead, baby, Zed`s dead! :-D

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 29.04.2004 (Чт) 10:20

Из кода никак, а из диалога ручками можно.
Просто с точки зрения кода разделителем всегда является запятая, а диалог берёт текущий системный разделитель, и если он отличен от запятой, то можно запятую. В русской настройке разделитель точка с запятой.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 120

    TopList