Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Взять первое значение из просматриваемого списка отбора - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Взять первое значение из просматриваемого списка отбора (Макросы/Sub)
Взять первое значение из просматриваемого списка отбора
Заяц6628 Дата: Пятница, 19.07.2024, 15:59 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 35
Репутация: 0 ±
Замечаний: 0% ±

Добрый день!
В макросе номер питомника с одного листа перемещается в другой, но почему то берется не первое значение которое выпадет по поиску. А как сделать чтобы выпадало первое?
Пример не номер питомника 111 чтобы выбирался, а номер питомника 42, файл приложила
К сообщению приложен файл: 1492581.xlsm (125.7 Kb)
 
Ответить
СообщениеДобрый день!
В макросе номер питомника с одного листа перемещается в другой, но почему то берется не первое значение которое выпадет по поиску. А как сделать чтобы выпадало первое?
Пример не номер питомника 111 чтобы выбирался, а номер питомника 42, файл приложила
Автор - Заяц6628
Дата добавления - 19.07.2024 в 15:59
Hugo Дата: Пятница, 19.07.2024, 23:21 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3487
Репутация: 752 ±
Замечаний: 0% ±

365
Цитата Заяц6628, 19.07.2024 в 15:59, в сообщении № 1 ()
не номер питомника 111 чтобы выбирался, а номер питомника 42
- такого не предусматривалось, но решаемо:

[vba]
Код

    If Cells(i, "C") = "номер питомника" Then
        If a(1, 1) = Empty Then a(1, 1) = Cells(i, "K")
    End If
[/vba]
К сообщению приложен файл: 5141912.xlsm (126.5 Kb)

excel@nxt.ru
webmoney: E265281470651 Z422237915069

Сообщение отредактировал Hugo - Пятница, 19.07.2024, 23:24
 
Ответить
Сообщение
Цитата Заяц6628, 19.07.2024 в 15:59, в сообщении № 1 ()
не номер питомника 111 чтобы выбирался, а номер питомника 42
- такого не предусматривалось, но решаемо:

[vba]
Код

    If Cells(i, "C") = "номер питомника" Then
        If a(1, 1) = Empty Then a(1, 1) = Cells(i, "K")
    End If
[/vba]
Автор - Hugo
Дата добавления - 19.07.2024 в 23:21
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Взять первое значение из просматриваемого списка отбора (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!