Автор: Hostyle. Всем Доброго, уважаемые форумчане! Помогите, пожалуйста, решить задачу. Суть: Есть 2 столбца, в первом встречаются повторяющиеся значения. Нужно удалить дубли, при этом сложить значения в ячейках этих же строк во втором столбце. Пробовал с помощью словаря решить - не хватило знаний, как результат: дубли просто исчезли из списка совсем. Пример приложил. Sub stringSummary() Dim wb As Workbook Dim ws As Worksheet, wsT As Worksheet Dim arr2, dict Dim i%, elem As Variant, n& Set wb = ...

Автор: amarok36. Добрый день! Подскажите, как средствами VBA сделать следующие действия. - Фильтровать уникальные значения по столбцу L и добавлять их в любой условный столбец на втором листе, к примеру в столбец A. - Для каждого уникального значения из столбца L выбирать соответствующие ему значения из столбца K (строк может получиться несколько) и добавлять эти значения в столбец B на втором листе. Для других столбцов нужно делать примерно то же самое, но я уже сориентируюсь по аналогии этих ...

Автор: Kukr47. Нужно чтобы при открытии любой книги excel у меня раскрывались листы снизу, а точнее ползунок этот уменьшался. Нашел такой код и он рабочий, но как я понимаю не в надстройке... я создал надстройку и прописал там вот так Private Sub Workbook_Open()    ActiveWindow.DisplayWorkbookTabs = True    ActiveWindow.TabRatio = 0.7 End Sub он ругается на ActiveWindow  потому что он пустой, вопрос, можно ли как-то осуществить то что мне нужно? мне нужно TabRatio =0.6, нужно для выгруженных из ...

Автор: huizz. Добрый вечер! Необходима помощь опытных форумчан. Написал маленький код VBA (файл пример во вложении). Столкнулся с проблемой вывода корректных значений. Данный код должен собирать информацию со всех таблиц и вставлять "друг под другом" на отдельном листе. Однако, на выходе я получаю задвоенный результат (строка копируется два раза). Буду рад любой помощи

Автор: R0mi1. Здравствуйте! Имеется таблица с данными в эксель. Нужно установить две кнопки 1) Сохранить в файлы, 2)Отправить адресату 1)Сохранять в файл необходимы следующие данные.       1.1 Первые 4 строки(Шапка) из таблицы(исходник)       1.2 Каждую последующую строку(с шапкой в отдельный файл(xlsx) образец  приложу.       1.3 Файл должен называться 1-й ячейкой  из строки       1.4  Если в 1-й ячейке строки пусто, тогда пропускаем. 2)Отправить адресату     2.1 Отправить по e-mail (список ...

Автор: Никита Митрофанов. Здравствуйте! У меня такая проблема: нужно с помощью макроса сделать подтягивание значений из двух таблиц в третью по уникальным значениям в одном столбце (все остальные пустые). Значения из других таблиц могут быть в случайном порядке. Знаю, что есть ВПР() в функциях, но он не подойдет, потому что таблиц больше, да и это нужно делать будет много раз. Тест - таблица в которую заливать 1 и 2 - таблицы со значениями безымянный рисунок - примерно что должно быть перенесено ...

Автор: Ivaroms. Добрый день! Искал по Форуму, пробовал прописать самостоятельно, но как-то криво выходит... У нас есть книга, в которой может быть сотни листов, на каждом листе таблица, таблицы имеют разное количество строк, но одинаковую структуру. Нам необходимо прописать в столбце Q начиная с 9-ой строки на каждом листе формулу до конца таблицы( грубо говоря протянуть). Помогите, пожалуйста, с написанием кода! =IF(RC[-13]>0,IF(OR(AND(NOT(RC[-8]=0),RC[-8]'0'!R1C3),& ...

Автор: kare. Здравствуйте , подскажите пожалуйста как подсчитать сумму 7 столбца в vba? Dim s As Long s = Cells(Rows.Count, 7).End(xlUp).Row + 1пытаюсь определить последнюю запуленною ячейку и добавить строчку для итога но дальше дело не идет(

Автор: RazorBaze. Стандартная функция Excel "Заполнить" > "Выровнять" (она же в VBA: "Selection.Justify") работает только с первыми 255 символами в ячейке, как и множество других подлых функций (например, "СЧЁТЕСЛИ"). Возможно ли обойти это ограничение? Возможно ли написать пользовательскую функцию? Может есть вообще другой способ? Задача: преобразовать текст в ячейке таким образом, чтобы рядом с ним создалось ...

Автор: RazorBaze. Все знают, что если начать ячейку с "=", а следом ввести букву (например, "Е") - появится список функций, начинающихся на эту букву: - ЕОШИБКА - ЕСЛИ - ЕСЛИПУСТО - ЕССЫЛКА - ЕТЕКСТ - ЕЧИСЛО, и т.д. При этом, если после "Е" поставить букву "С" - все несовпадения отсеются, и останутся только: - ЕСЛИ - ЕСЛИПУСТО - ЕССЫЛКА, и т.д. Такой же список, только с другими вариантами выбора, выпадает в ...

Автор: tioko. Добрый день, товарищи! Есть отчет в таком виде: http://joxi.ru/BA0vvNghJ7edMm Есть много красивых графиков к этому отчету, примерно десяток (подписи данных удалила): http://joxi.ru/EA4vvjEhwNennm  И этот десяток диаграмм надо скопировать и перестроить для 21 региона. Можете, плиз, написать мне макрос, который бы сдвигал все ряды диаграммы (а лучше - всех выделенных диаграмм) на определенное число строк или столбцов? Если можно, со скриншотами, что куда вставлять и ...

Автор: tmash. Внезапно появляются два заполненных массива м01 и м02.Чтобы не упутать, попробую объяснить на примере диапазонов.Количество столбцов (измерения) в массивах обычно разное. Нужен код VВA собирающий новый массив из этих двух. По рабоче-крестьянски: Если название столбца из м02 есть в м01, то добавить содержимое этого столбца под столбец тёзку. Если названия столбца из м02 нет в м01, то добавить название столбца к названиям столбцов, а данные добавить в новый столбец, ниже ...

Автор: dvolkov80. Необходимо создать макрос который бы копировал данные из формы B2:F19 на Листе 1 и вставлял в таблицу на Листе 2. Необходимое условия:1. Вставлялись только значения, а не формулы, форматы и т.д. 2. Вставка на Лист 2 только в пустые строки таблицы накопительно. 3. Пустые строки из формы B2:F19  не вставлялись в таблицу на Листе 2. После вставки форма B2:F19 очищалась.

Автор: Paul_Pavel. Доброго времени суток, уважаемые знатоки VBA и Exel! В ходе работы столкнулся с непростой (для меня - но,уверен, не для вас ;) ) задачей. Имеется таблица Exel со списком записей. В конце списка - строка "Проверил". Необходимо создать кнопку которая добавляла бы новую запись с автоматическим присваиванием номера при этом сохраняя строку "Проверил". Далее эта же кнопка вызывает UserForm с TextBox-ами в которые вручную вводятся данные, после ...