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

Автор: Blok. Получается средствами VBA отправить udp пакет с запросом на устройство, оно отвечает пакетом с нужными данными но при использовании функции чтения данных из сокета exel наглухо виснет. Помогите пожалуйста исправить.

Автор: Petrosyan. Добрый день! Возникла тривиальная задача, но нет идей как решить следующее: Необходимо получить массив из номеров строк выделенных пользователем, ячейки должны быть видимыми.  Например имеется набор из десяти строк 2 из которых скрыты пусть это будет 3 и 8 строки. Необходимо чтобы в массив попали все видимые arr = (1,2,4,5,6,7,9,10) . Подскажите пожалуйста как сделать у меня из идей только перебор циклом каждой строки на состояние видимая или нет, и последовательное заполнение ...

Автор: Chin_Chin. Добрый день, детальные условия в файле. По оплате и деталям прошу писать в личку.

Автор: Дмитрий С. Здравствуйте. Как сделать, чтобы макрос начал действовать с привязкой к определенной ячейке и до конца определенной ячейке, т.е. у нас допустим в этом же листе есть объединённая ячейка Товары, вот и было бы привязка к наименованию этой ячейки. Ниже в коде   в строке Dim U As RangeSet U = Sheets("Лист1").Range("от ячейки с текстом "Товары":до ячейки с наименованием "Работа""), нужно прописать: между ячейкой (смотри вложение) с текстом ...

Автор: Леонид Субботин. Добрый день! Подскажите, возможно ли прописать функцию на VBA, которая будет сравнивать ячейки по цвету шрифта, чтобы её можно было вызвать из ячейки (по подобию RegExp)? К примеру, мне нужно сравнить 2 ячейки с отклонениями, в одной значение выделено зеленым шрифтом, а в другой красным. Нужно, чтобы при сравнении выдавалось значение ИСТИНА/ЛОЖЬ, если цвет шрифта одинаковый/различается

Автор: Spec. Добрый день! Необходимо организовать поиск по всем файлам Excel в папке и всем листам в каждом файле. И копировать всю строку, где нашелся искомый текст. Копировать все нахождения и все строки, где они находятся. Имеется макрос, но он не работает. Нужно доработать макрос. Желательно сохранить общую структуру неработающего макроса, так как макрос для многократного использования. Плюс добавить комментарии для кода, чтобы код можно было использовать регулярно. Проблема ...

Автор: Alexander Kruglov. Уважаемые спецы, это макрос аналога ВПР который я нашел на форуме, подскажите как можно исправить код, чтоб он корректно работал с отфильтрованными данными, сейчас данные  для сравнения забираются с W2 какие бы строки не были отфильтрованы.  Спасибо! a = Range(.[w2], .Range("W" & iLastrow)).Valueа вот полный код Sub Macro4() Dim a, b, c, iLastrow As Long, i As Long, ii As Long Selection.AutoFilter Field:=1, Criteria1:="add4" ...

Автор: Сергей. Добрый день. В общем, нужен код. Основная задача - импорт данных из открытого excel в две таблицы (главная+подчиненная) access. Плюс по мелочам в access.  Если кто-то заинтересуется - скину полное описание.

Автор: merlicka. Друзья, добрый день. Подскажите, пожалуйста, есть макрос, который при заполненном столбце А на листе 1, копирует значения на лист 2. Однако, он копирует на лист 2 в те же самые строки, где находились значения на листе 1. Можно ли сделать так, чтобы макрос копировал с листа 1 на лист 2 в последнюю пустую строку? Не эксперт в vba, буду благодарна за помощь.Private Sub Worksheet_Activate() Dim a(), i&, ii&, x& a = Sheets(1).UsedRange.Value ReDim b(1 To UBound(a, 1), ...

Автор: Алексей Китаинов. Добрый день, Я составляю макрос, который строит календарь электронной записи на основе уникального номера записи. Код на скриншоте и файл ниже. Логика действий: 1. Уникальный номер записи присваивается каждой записи и представляет собой конвертированные дату и время начала приема 2. Область Calendar - массив всех конвертированных комбинаций дат и времени в 2021 году 3. Макрос находит уникальные номера в BaseData, X и Y-координаты и заливает соответствующие ...

Автор: vasa666. Нужен макрос который сверяет фамилии из файла, с фамилиями в листе Excel'я. ТЗ. 1) Макрос сверяет фамилии в колонке "Е", с фамилиями из файла (в файле будет 318.000 строк). Если файл с фамилиями нужно перевести в какой-то другой формат/кодировку, для более быстрой работы, готов выслушать предложения. 2) Если макрос НЕ находит полного совпадения при сверке данных из файла, то в столбце "АЕ", напротив отсутствующей фамилии ставит ...

Автор: vladjuha. Здравствуйте! По двойному щелчку по элементу, находящемуся в вычисляемом поле сводной, откроется лист со всеми связанными исходными данными. Как на VBA можно обратиться к этим данным (без промежуточного листа, естественно)? В приложенном файле, например, при выделении в сводной ячейки из зелёной группы получить в жёлтой ячейке значение связанного исходного поля "ID" (отсутствует в самой сводной)?

Автор: Sniaper. В файле 3 модуля. Первый - функция, выполняющая вставку модуля № 3 в новый файл, второй - выполняет копирование листа и запускает функцию. У меня не получается скопированный модуль засунуть в новый файл в "ЭтаКнига", вместо этого он создает модуль в новой книге.