Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » Sniaper
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Как по очереди обратиться к ячейкам диапазона
 
#
17.02.2022 10:02:12
Ігор Гончаренко, doober, Jack Famous, БМВ, Большое спасибо за ответ. Подходят все варианты.

пс Сегодня сделал выгрузку из БД, массив стал больше 1,5 раза... Придется видимо отказываться от For Each, Exel просто виснет минут на 5-7
Изменено: Sniaper - 17.02.2022 10:04:32
 
Перейти    
Как по очереди обратиться к ячейкам диапазона
 
#
16.02.2022 16:23:12
Всем ку
Код
Sub main()
    
    Dim data_table As Variant
    Dim item As Variant
    
    data_table = Range("name_table").Columns(2)

    For Each item In data_table
        If item <> Empty Then
            Debug.Print item
        End If
    Next item

End Sub

В этом варианте получается что item это string. Ни узнать адрес, ни смещение не работает

Код
Sub main()
    
    Dim data_table As Range
    Dim item As Variant

    
    Set data_table = Range("name_table").Columns(2)
    
    For Each item In ThisWorkbook.Worksheets("Лист11").Range(data_table.Address)
        If item <> Empty Then
            Debug.Print item
        End If
    Next item

End Sub

Как сделать вариант выше, только читабельней? К тому же, может есть вариант сделать перебор быстрее, позиций больше 20к?
 
Перейти    
Копирование модуля в "ЭтаКнига"
 
#
26.10.2020 18:06:27
Спасибо большое за помощь! Все работает
 
Перейти    
Копирование модуля в "ЭтаКнига"
 
#
26.10.2020 17:57:49
Дмитрий(The_Prist) Щербаков, Копирую лист в новую книгу и в нее же хочу скопировать модуль3 на место "ЭтаКнига". И да, спасибо за исходники  
 
Перейти    
Копирование модуля в "ЭтаКнига"
 
#
26.10.2020 17:19:41
В файле 3 модуля. Первый - функция, выполняющая вставку модуля № 3 в новый файл, второй - выполняет копирование листа и запускает функцию.
У меня не получается скопированный модуль засунуть в новый файл в "ЭтаКнига", вместо этого он создает модуль в новой книге.
 
Перейти    
Суммирование ячеек правой таблицы по вхождению данных из левой
 
#
15.06.2020 14:40:47
Мучо грасиес, добрый человек
 
Перейти    
Суммирование ячеек правой таблицы по вхождению данных из левой
 
#
15.06.2020 14:33:09
Ку! Как записать формулу для суммирования ячеек правой таблицы по вхождению данных из левой. Без учета последовательности имен? В итоге должно получится, что найдено 2 имени и итоговая сумма = 21.
 
Перейти    
Подсчет ячеек в массиве при определенном условии
 
#
30.01.2020 13:39:50
Максим В., премного благодарен
 
Перейти    
Подсчет ячеек в массиве при определенном условии
 
#
30.01.2020 13:34:07
Всем ку!
Есть n-ое количество магазинов, где можно содержать нормативный объем продуктов, а есть максимальный объем склада (все измеряется в ед/штуках). Необходимо в одной ячейке вывести цифру которая покажет, в скольких магазинах содержать нормативный объем не получится из-за маленького склада
 
Перейти    
Поиск значения по 3м условиям
 
#
02.09.2019 18:22:49
Kuzmich, Премного благодарен за макрос, завтра попробую ориентировать его под свою таблицу
 
Перейти    
Поиск значения по 3м условиям
 
#
02.09.2019 18:10:43
Спасибо, работает
 
Перейти    
Поиск значения по 3м условиям
 
#
02.09.2019 17:48:54
Необходимо подставить значения во все ячейки пустой таблицы ниже, при условии, что меняя год в выпадающем списке в нижней таблице, значения будут так же меняться на соответствующие в верхней таблице. Ситуация усложняется тем, что эти таблицы у меня находятся на разных листах, объектов в сотни раз больше и часто приходится менять объекты местами.

Сижу ломаю голову 4-ро суток...
 
Перейти    
Страницы: 1
Наверх