Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.62/21: Рейтинг темы: голосов - 21, средняя оценка - 4.62
 Аватар для DVSamchuk
1 / 1 / 1
Регистрация: 24.01.2013
Сообщений: 15

Поиск минимальной даты в диапазоне без учета пустых значений

29.05.2014, 16:30. Показов 5001. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Уважаемые знатоки, есть головоломка одна.
Прежде всего, файл прикреплен.
В нем есть 2 именованных диапазона (Dates & Clients)

Создал именно имена потому, что возможно появится необходимость добавлять строки выше или столбцы слева. (Возможно это было необязательно, прошу навести примеры альтернативных методов обозначения диапазонов)

Как видим, выполнив процедуру, мы всегда получаем мин. дату = 0.
А мне, грубо говоря, надо чтобы отображалась 01.01.2014.

Соотв. вопрос: как обрезать этот диапазон в момент поиска в нем минимального значения? Была идея объявить диапазон DateArray() как Names ("Dates") и работать с ним, но не особо вышло.

Заранее благодарю за ответы!
Вложения
Тип файла: rar avgliab_v3.rar (12.2 Кб, 19 просмотров)
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
29.05.2014, 16:30
Ответы с готовыми решениями:

Сумма столбца без учета пустых полей
Добрый день, подскажите пожалуйста, как написать код. Если в столбце "Сумма" есть пустые поля, то пропускает пустые поля и складывает те...

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

Выбор даты без учета выходных дней
Коллеги, доброго дня. Помогите допилить скрипт по выбору даты из таблицы. В наличие есть объект, в котором хранятся даты за 2 месяца. ...

4
призрак
 Аватар для ikki
3266 / 894 / 119
Регистрация: 11.05.2012
Сообщений: 1,702
Записей в блоге: 2
29.05.2014, 16:54
Visual Basic
1
2
3
4
5
6
Sub tst()
  With Sheets(1)
    x = Application.Min(.Range(.[b1], .Cells(1, .Columns.Count).End(xlToLeft)))
    MsgBox CDate(x)
  End With
End Sub
0
 Аватар для DVSamchuk
1 / 1 / 1
Регистрация: 24.01.2013
Сообщений: 15
30.05.2014, 11:10  [ТС]
Благодарю за ответ. Так, конечно же, можно. Но идея в том, чтобы выполнять поиск минимального значения именно в именованном диапазоне, исключая нулевые значения.
Цитата Сообщение от DVSamchuk Посмотреть сообщение
Создал именно имена потому, что возможно появится необходимость добавлять строки выше или столбцы слева.
0
призрак
 Аватар для ikki
3266 / 894 / 119
Регистрация: 11.05.2012
Сообщений: 1,702
Записей в блоге: 2
30.05.2014, 17:39
Visual Basic
1
2
3
4
5
6
7
8
Sub tst()
  Dim c As Range, xMin
  xMin = 99999
  For Each c In Names("Dates").RefersToRange
    If c <> 0 Then If xMin > c.Value Then xMin = c.Value
  Next
  MsgBox xMin
End Sub
1
 Аватар для DVSamchuk
1 / 1 / 1
Регистрация: 24.01.2013
Сообщений: 15
03.06.2014, 18:28  [ТС]
Картина называется: "...а ларчик просто открывался"
Спасибо большое, сам не допёр зациклить

Добавлено через 30 секунд
Господа, тема закрыта.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
03.06.2014, 18:28
Помогаю со студенческими работами здесь

Прописать даты и месяцы без учёта года
Здравствуйте! Помогите с решением,описание задачи в файле пример.

Поиск пустых значений
Я хочу найти значения в таблице где поле &quot;Завершение&quot; пустое. Выполняю такой запрос: SELECT Incindent.Завершение,...

Поиск пустых значений
Я совсем новичок в Дельфи, и не могу справиться с простейшей задачей, которая, скажем, в VB решается элементарно. Имеется массив...

Скопировать X любых файлов, созданных между 9:00 и 17:00 (без учёта даты)
Добрый день. Извиняюсь если не там задаю вопрос. Камера делает снимки круглосуточно в течении года, все снимки хранятся в одной...

Вывод уникальных данных MySQL без пустых значений
Люди добрые подскажите как вывести уникальные значения исключив из результата пустые значения? Меня интересует сам запрос Структура...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer
8Observer8 08.02.2026
Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств
8Observer8 07.02.2026
Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru