Страницы: 1
Поиск
Сравнение коллекций Excel VBA, Вопрос по работе с коллекциями в Excel VBA
Автор: Владислав Дорошенко. Всем привет! Пишу макрос в Excel для выборки данных с одной таблицы одного листа и последующей вставке в другую таблицу на другой лист, с удалением дубликатов. Логика программы: 1) Под определенным условием, программа выбирает данные из нужных мне ячеек первого листа и заносит её в коллекцию. 2) Аналогично первому пункту, программа проделывает те же действия, но только со второй таблицей на втором листе. 3) Используя "цикл в цикле" программа сравнивает ...
Теги: Excel, VBA, Collections
Изменен: 22.06.2021
Читать сообщение на форуме или сайте.
Макрос для коллекций и сбора инфы в коллекции, возможность создать функцию CollectionCreate(ColName as String, DataAdd as Range)
Автор: SanShiney. Здравствуйте! Есть мысль. Но не знаю, на сколько она реализуема. Когда пишу макросы, часто приходится вновь и вновь писать код для создания коллекции и накопления в неё информации. Так, вот, возможно ли написать sub, который бы это делал без лишнего гемора? К примеру: CollectionCreate(TESTCOLLECTION) - создать коллекцию с имененм "TESTCOLLECTION" CollectionAdd(TESTCOLLECTION, 100) - добавляет 100 в коллекцию  "TESTCOLLECTION" ...
Теги: macro, Collections, VBA
Изменен: 23.06.2016
Читать сообщение на форуме или сайте.
Collections и Error handling, На одном компе данный код работает, а на другом выдает ошибку
Автор: SanShiney. Вчера написал код. Ниже привожу выдержку по коду, которая даёт проблему. ' Раздаю определенения Dim arr1 As New Collection, a1 Dim aFirstArray1() As Variant Dim i1 As Long ' Присваиваю значения переменным. Т.к. данные на другой странице, использую WTIH With Sheets("PROJECT DETAILS") LastRow1 = .Cells.Find("*", .Range("A1"), , , xlByRows, xlPrevious).Row PROJECTSLIST1 = .Range(.Cells(2, 1), .Cells(LastRow1, 1)).Value End ...
Изменен: 08.09.2014
Читать сообщение на форуме или сайте.
Страницы: 1
Наверх