Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 22.12.2008, 09:48   #1
StasSv
Пользователь
 
Регистрация: 29.12.2007
Сообщений: 71
По умолчанию пустые ячейки

здравствуте,
подскажите пожайлуста, как в проверке списком (данные-проверка-условия проверки-список)
сделать, что бы не отображались пустые ячейки, а то ставлю галочку игнорировать пустые ячейки, а всеравно отображает
StasSv вне форума
Старый 22.12.2008, 10:56   #2
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Да. Есть такое дело. В подобных (и многих других) случаях, можно применить макрос, который, например, выполняется по событию открытия книги. Пусть в ячейке "B1" нужно создать выпадающий список из значений ячеек в диапазоне "A1:A15", игнорируя пустые ячейки. Можно так:
Код:
Sub DataValid()

    Dim i As Integer, Msg As String
    For i = 1 To 15
        If Cells(i, "A") <> "" Then Msg = Msg & Cells(i, "A") & ","
    Next
    If Msg <> "" Then Msg = Left(Msg, Len(Msg) - 1)
    With [B1].Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Formula1:=Msg
        .InCellDropdown = True
    End With
    
End Sub
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 22.12.2008, 15:53   #3
StasSv
Пользователь
 
Регистрация: 29.12.2007
Сообщений: 71
По умолчанию

Большое спасибо!
StasSv вне форума
Старый 22.12.2008, 15:59   #4
StasSv
Пользователь
 
Регистрация: 29.12.2007
Сообщений: 71
По умолчанию

И еще один вопросик тоже про списки можно ли как нибудь присвоить к списку диапазон с другого листа, а то как-то не казисто получается на каждом листе прятать нужный диапазон
StasSv вне форума
Старый 22.12.2008, 16:08   #5
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Выделяем диапазон ячеек для подстановки, и присваиваем диапазону имя (например, "МойСписок")


Переходим на лист, где должен быть выпадающий список.
Жмём Данные - Проверка
Ставим: условие проверки - список
В поле Источник вводим формулу типа: =ИНДЕКС(МойСписок;;1)
EducatedFool вне форума
Старый 22.12.2008, 17:43   #6
StasSv
Пользователь
 
Регистрация: 29.12.2007
Сообщений: 71
По умолчанию

Шикаааарно, спасибо!
StasSv вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проверка на пустые введенные данные rainbow Паскаль, Turbo Pascal, PascalABC.NET 7 24.10.2008 09:42
Пустые поля в запросах PetroPorsh Microsoft Office Access 1 16.10.2008 16:56
Пустые строки в выпадающим списке в ячейке Shavminator Microsoft Office Excel 4 12.08.2008 18:36
Как разделить число и текст в одной ячейки на две ячейки. neboskreb Microsoft Office Excel 2 15.04.2008 19:39
Как удалить пустые строки в WORD? KUNAR Microsoft Office Word 2 04.09.2007 20:56