ReSQL.ru
     
powered by simpleCommunicator - 2.0.57     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel Выпад. список с данными другого листа, с удалением использованных данных
5 сообщений из 5, страница 1 из 1
Excel Выпад. список с данными другого листа, с удалением использованных данных
    #38617319
...12345
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
...12345
Гость
Добрый день всем.
Собственно вопрос совпадает с темой топика.
Есть у кого пример, поделитесь.
Заранее спасибо.
...
Рейтинг: 0 / 0
17.04.2014, 11:40
| Ответить | Цитировать | Написать  
Excel Выпад. список с данными другого листа, с удалением использованных данных
    #38617332
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
The_Prist
Участник
...12345,

Вообще-то принято обычно так:
-Вы выкладываете свой пример данных;
-пишите условия, пожелания, проблемы.

И для этого есть причины: я сейчас приложил свой пример к сообщению. Далеко не факт, что Вам такое решение подойдет. И получится Вы потратите и свое и мое время впустую.
Для работы файла необходимо разрешить макросы.
Работает только для выпадающего списка на листе "VBA" в ячейке А1.
Сам изначальный список на втором листе. Формируется при помощи именованного диапазона "Список".
...
Рейтинг: 0 / 0
17.04.2014, 11:51
| Ответить | Цитировать | Написать  
Excel Выпад. список с данными другого листа, с удалением использованных данных
    #38617387
...12345
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
...12345
Гость
The_Prist, извините, что при небрег принятыми правилами.
Своего примера то у меня и нету.
А условия, пожелания и проблема была в том, что видел примеры по
1. Созданию выпадающего списка с данными из другого листа
2. Создание выпадающего списка с удалением использованных данных
а вот объединить эти два примера в один у меня не получается
Вы правильно меня поняли и Ваш пример вполне подойдет, вот только подскажите еще
чтобы список работал не только в ячейке А1 листа "VBA", а например во всем столбце А листа "VBA".
...
Рейтинг: 0 / 0
17.04.2014, 12:32
| Ответить | Цитировать | Написать  
Excel Выпад. список с данными другого листа, с удалением использованных данных
    #38617432
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
The_Prist
Участник
...12345,

Правая кнопка мыши на листе "VBA" - Исходный текст. Вместо строки:
Код: vbnet
1.
If target.Address(0, 0) <> "A1" Then Exit Sub


вставляете такую:
Код: vbnet
1.
If intersect(target, Range("A:A")) is nothing Then Exit Sub


Правда, там нюансы выплывут. Для каждой новой строки список должен быть новый или удалив значение, введенное в А1, в А2 оно так же не должно уже отображаться? плюс код будет срабатывать при любом изменении в ячейках столбца А. Даже если оно не имеет отношения к вып.списку.
...
Рейтинг: 0 / 0
17.04.2014, 13:03
| Ответить | Цитировать | Написать  
Excel Выпад. список с данными другого листа, с удалением использованных данных
    #38617482
...12345
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
...12345
Гость
The_Prist,
> введенное в А1, в А2 оно так же не должно уже отображаться? - да
> плюс код будет срабатывать при любом изменении в ячейках столбца А. Даже если оно не имеет отношения к вып.списку.
да, действительно, даже если ручками ввожу данные (в столбце А там где нет вып.списка), они удаляются с листа2, но если ввести данные не относящиеся к списку
какую нибудь билеберду, то сразу ругается
Код: vbnet
1.
    Range("Список").Find(target).Delete Shift:=xlUp


но это уже малозначительный факт для меня.
Еще раз Вам спасибо за помощь.
...
Рейтинг: 0 / 0
17.04.2014, 13:37
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel Выпад. список с данными другого листа, с удалением использованных данных
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=38617332&tid=2174094]:
 0ms
get settings:
 8ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 63ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 42ms
get tp. blocked users:
 1ms
others: 13ms
total:  152ms
созд. / загр.: 152ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]