Страницы: 1 2 След.
Поиск
Изменение строк таблицы (удаление / добавление) по условию с помощью макроса (VBA)
Автор: Tomen992. Добрый день, уважаемые форумчане. Тема избитая, но, к сожалению, подходящего решения не смог найти.  Пытался сам из кусков других тем получить желаемое, но пока так и не смог.  Ситуация следующая: есть таблица (№1), которая с помощью формул (по условиям) наполняется данными из другой таблицы (№2). Таблицы все умные.  И есть третья таблица (№3), которая считает, сколько значений подходят под условия переноса данных (проверка).  Пытаюсь сделать следующий макрос:  1. При открытии ...
Теги: Макрос
Изменен: 26.05.2025
Читать сообщение на форуме или сайте.
Макрос для поиска в Excel
Автор: Mira868. Есть таблица с оборудованием. Там прописаны разные модели с характеристиками. Нужно сделать поисковую систему, чтобы по выбранным характеристикам подбиралась модель оборудования. Можете пожалуйста помочь. Необходимо сделать маленькую табличку, в которой можно будет выбрать характеристики и она подберет модель. Часть характеристик будет выбираться из выпадающего списка, а другая часть будет отмечаться галочкой. С макросами имела дела давно в Access, сейчас уже подзабылась ...
Изменен: 15.05.2025
Читать сообщение на форуме или сайте.
Удаление дубликатов строки.
Автор: 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 = ...
Теги: VBA, Excel, Макрос
Изменен: 24.04.2025
Читать сообщение на форуме или сайте.
Маркос форма с паролем для доступу к листам , Макрос форма с паролем которая дает доступ к листам, пароль связан с датой
Автор: Dender. Помогите пожалуйста создать макрос , нужна форма  с паролем которая даёт  доступ к листам. Пароль должен работать только некоторое время, припустим год, по истечению строка, вступает в силу новый пароль.
Теги: Макрос
Изменен: 10.12.2024
Читать сообщение на форуме или сайте.
Макрос для сохранения строки из таблицы в файл и рассылке по почте., Требуется макрос для сохранения строки из таблицы в файл и рассылке по почте.
Автор: R0mi1. Здравствуйте! Имеется таблица с данными в эксель. Нужно установить две кнопки 1) Сохранить в файлы, 2)Отправить адресату 1)Сохранять в файл необходимы следующие данные.       1.1 Первые 4 строки(Шапка) из таблицы(исходник)       1.2 Каждую последующую строку(с шапкой в отдельный файл(xlsx) образец  приложу.       1.3 Файл должен называться 1-й ячейкой  из строки       1.4  Если в 1-й ячейке строки пусто, тогда пропускаем. 2)Отправить адресату     2.1 Отправить по e-mail (список ...
Изменен: 28.08.2024
Читать сообщение на форуме или сайте.
VBA Word cохранение связанного файла в формате pdf используя данные из поля слияния MERGEFIELD в имени файла
Автор: afonason. Есть таблица с данными Excel "export (19)" и связанный файл Word "Ответ об отказе срок_"  который автоматически заполняется через поле слияния (MERGEFIELD) Задача с помощью макроса сохранить Word файл в формате .pdf с определённым именем (добавить к имени файла № претензии который подгружается в поле слияния { MERGEFIELD Номер_претензии }) Нашел макрос похожего действия, но он добавляет текст к названию из поля со списком. Как сделать ссылку на поле слияния ( ...
Изменен: 23.08.2024
Читать сообщение на форуме или сайте.
Не работает макрос фильтрующий столбец при переходе с гиперссылки , При переходе с гиперссылки фильтрует не то значение
Автор: anna_bella_valentina. Добрый день! Есть отчет на 3 листа, один из них сводный. На первом и втором листе сделаны гиперссылки на итоговую таблицу и зашит простой макрос на фильрацию: Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)     ActiveSheet.Range("ФП").AutoFilter 16, Target.TextToDisplay End Sub Но макрос отрабатывает криво. При переходе с гиперссылки всегда фильтрует по первому значению с листа, а не по тому значению с которого переходим. Подскажите, ...
Изменен: 18.08.2024
Читать сообщение на форуме или сайте.
Макрос. проверка работоспособности гиперссылки на файл, наличие файла по данной гиперссылке
Автор: fixboot. Необходимо создать макрос проверки работоспособности гиперссылки на файл (наличие файла по данной гиперссылке). файлы: pdf, doc, xls, jpeg таблица и файлы размещены на локальном сервере (если имеет значение) если можно вывод результата за область сводной таблицы
Изменен: 29.07.2024
Читать сообщение на форуме или сайте.
Макрос для замены нескольких значений в стобце на одно.
Автор: G_110036246309433414584. Добрый день. Есть столбец в таблице. В этом столбце 1000 ячеек с различными номерами. Мне надо заменить в этом столбце некоторые из них (313, 216, 237, 391, 127, 190, 127, 402, 407) на текст Д/Р. Подскажите пожалуйста макрос для реализации этой задачи. З.Ы. Одно и тоже значение в столбце в таблице может повторяться более 30 раз
Изменен: 05.07.2017
Читать сообщение на форуме или сайте.
Макрос для сдвига всех рядов диаграммы на заданное число строк/столбцов
... региона. Можете, плиз, написать мне макрос, который бы сдвигал все ряды ... и где задавать, я в макросах полный чайник >_ ... ; а лучше написать формочку с кнопкой. Спасибо!
Изменен: 29.06.2017
Читать сообщение на форуме или сайте.
Макрос для добавление тени для всех картинок в Power Point
Автор: esk_. Здравствуйте!  Подскажите, пожалуйста, как изменить следующий макрос, чтобы можно были добавлять тень не  для исключительно выделенных картинок, но для всех картинок в презентации:  Sub MakeShadow()     Dim i As Integer     With ActiveWindow.Selection.ShapeRange.shadow         For i = 1 To 2             .ForeColor.RGB = RGB(220, 220, 220)             .Transparency = 0.35             .Visible = True             .Blur = 10             .OffsetX = 5             .OffsetY = ...
Теги: Макрос
Изменен: 23.06.2017
Читать сообщение на форуме или сайте.
Макрос копирования диапазона только со значениями
Автор: dvolkov80. Необходимо создать макрос который бы копировал данные из формы B2:F19 на Листе 1 и вставлял в таблицу на Листе 2. Необходимое условия:1. Вставлялись только значения, а не формулы, форматы и т.д. 2. Вставка на Лист 2 только в пустые строки таблицы накопительно. 3. Пустые строки из формы B2:F19  не вставлялись в таблицу на Листе 2. После вставки форма B2:F19 очищалась.
Теги: Макрос
Изменен: 08.06.2017
Читать сообщение на форуме или сайте.
Перемещение текста с одной книги в другую с помощью кнопки, Нужно переместить текст в ячейке в другую книгу с помощью кнопки, поиск в интернете нечего не дал
...  в другую книгу с помощью кнопки, поиск в интернете нечего не ... из-за незнания макросов получался всякий бред.  Код макроса для кнопки на перемещение ...
Изменен: 06.06.2017
Читать сообщение на форуме или сайте.
Макрос на максимальное значение из выделения
Автор: Mit Boy. Подскажите, как сделать так, чтобы Leader равнялось не трем, а максимальному числу в выделенном столбце (которое выделяется перед выполнением макроса) Сам алгоритм создает соседний столбец, где пересчитывает все значения выделения как доли от самого большого значения в выделении (которое, соответственно, становится равно единице). Другая проблема заключается в том, что если выделять снизу вверх, столбец неправильно располагается, но это не так важно. Sub Макрос() ' ' ...
Теги: Макрос
Изменен: 26.04.2017
Читать сообщение на форуме или сайте.
Второй DblClick, повторный, двойной клик
Автор: SHARP. По отдельности работает и Click и DblClick, а при совмещении перестает выдавать 4 Private Sub Button_Click() If Button.Caption = "1" Then Button.Caption = "2" Else Button.Caption = "1" End If End Sub Private Sub Button_DblClick(ByVal Cancel As MSForms.ReturnBoolean) If Button.Caption = "3" Then Button.Caption = "4" Else Button.Caption = "3" End If End ...
Изменен: 11.03.2017
Читать сообщение на форуме или сайте.
Выполнить макрос на всех листах
Автор: SHARP. Доброго времени суток Как сделать так, чтобы При сохранении книги макрос работал на всех листах где это нужно, а не только на активном? Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Call ЗАКРЫТЬ End Sub Sub ЗАКРЫТЬ() ActiveSheet.КнопкаЗОР.Caption = "ЗАКРЫТО" ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True End Sub
Изменен: 10.03.2017
Читать сообщение на форуме или сайте.
"Парсинг" текстового файла из ексель, открыть текстовый файл и разбивать его на столбики (разделяются знаком "@")
Автор: Ferenco. Привет команда "Планеты Эксель". Есть такая задача: Нужно с ексель файла открывать ТХТ файл определенной структуры - каждый столбик разделяется знаком "@". Как открывать текстовый файл с екслель макросом, и разбивать его на столбик? Столбики разделяются знаком "@" В разных случаях кол-во этих столбиков может быть разньім. Нужно чтобы результат этого выносился в определенную вкладку этого же файла. Без макросов не обойтись. Я пробовал, не получилось ...
Изменен: 02.03.2017
Читать сообщение на форуме или сайте.
Автоматический экспорт в CSV
Автор: Frommas. Здравствуйте! Подскажите, возможно ли сделать такой макрос, что бы данные из файла эксель (вложение), автоматически экспортировались в один и тот же CSV файл с настройками частоты экспорта от 1 до 600 сек, без непосредственного открытия файла. И кто бы мог в этом помочь, сам эти штуки писать не умею. Во вложении файл эксель исходный и CSV в виде который нужен Подобие как делает эта штука: https://xltools.net/ru/export-to-csv/ Только весь ручной процесс макрос должен делать ...
Теги: Макрос
Изменен: 14.02.2017
Читать сообщение на форуме или сайте.
Вставка или редактирование надписи на фигуре, с использованием макроса
... кнопкой OK?  Нигде не смог в интернете найти именно добавление надписи макросом ... . Знаю некоторые базовые вещи по макросам, поэтому не ... был создан при записи макроса нажатием соответствующей кнопки :) Вставка синего ценника Sub ... Auto_Open() ' ' Макрос создающий фигуру с ценником ... открытии или при нажатии на кнопку ' Сочетание клавиш: Ctrl+f '     ActiveSheet ...
Теги: Макрос, VBA, #Excel
Изменен: 22.01.2017
Читать сообщение на форуме или сайте.
Отбор данных и построение сводной таблицы макросом, не работает цикл
Автор: newb. Добрый день. Очень нужна помощь с циклом в макросе. Есть исходный файл с данными об объемах продаж в разрезе руководителей региона. Нужно, чтобы макрос отбирал данные по признаку "руководитель региона", копировал в новую книгу и строил сводную таблицу по этой выборке. Добиться этого по одному руководителю региона у меня получилось, но перебрать всех руководителей циклом никак не выходит. Помогите, пожалуйста, найти ошибку (с vba раньше не сталкивалась, а макрос ...
Изменен: 21.01.2017
Читать сообщение на форуме или сайте.
Частичное совпадение ячеек в столбце, поиск частичных совпадений в ячейках столбца, Частичное совпадение ячеек в столбце
Автор: tru. Добрый день всем! задаю тему которая не однократно обсуждалась. (пересмотрел все ответы на форуме нужного не нашел) нужно поправить макрос который ищет частичное совпадение выделенных ячеек и окрашивает в цвета но он не видит совпадения такого плана 0604B JF-K0604B подскажите как сделать что бы показывал такие совпадения Public Sub MarkDuplicates() Dim t$ On Error Resume Next Colors = Array(12900829, 15849925, 14408946, 14610923, 15986394, 14281213, 14277081, _ ...
Теги: Макрос
Изменен: 05.01.2017
Читать сообщение на форуме или сайте.
Макрос по поиску последней заполненной ячейки в столбце постоянно ошибвается.
Автор: Fleshsam. Добрый день! файл очень большой с кучей макросов но вот в чем проблема!  при запуске формы выполняется такая часть макроса по заполнению LISTBOXаV = Cells(Rows.Count, 1).End(xlUp).Row RKES_data = Sheets("РКЭС").Range("A1:A" & V) RKES.List = RKES_data в этой строке 24 значения! Но почему то V=279  279 строка пустая  Удаляю строку 279 и все ок, проходит время и опять 279.  Другие макросы на этом листе отсутствую  Как понять в чем проблема и выловит ...
Изменен: 16.12.2016
Читать сообщение на форуме или сайте.
Считывание заданных точек с диаграммы макросом, допостроение и взятие точек с диаграммы через макрос
Автор: pnd. Здравствуйте уважаемые! В виду отсутствия опыта работы с VBA прошу помощи, так как срочно стоит задача. Даны строки данных (БД) из которых необходимо выбрать каждую в отдельный  диапазон (0...3,0 с шагом 0,3)  по значению из одного столбца, далее в выбранном диапазоне (например 0..0,3) необходимо по найденным точкам построить график, где y=значение столбца в пределах 0..0,3, а  x=значение другого столбца в диапазоне 0 до 20. столбец с значениями Х редко доходить до 1 и иногда ...
Теги: Макрос, VBA
Изменен: 11.12.2016
Читать сообщение на форуме или сайте.
Составление сводной таблицы путем автозаполнения пустых ячеек по условию
Автор: Samangeldy. Добрый день! У меня возникла проблема с решением рабочей задачи, и так как очень часто темы на данном форуме мне помогали в подобных вещах решила написать, так как в этот раз не нашла схожей темы в прошлых обсуждениях.  Задача: Имеется отчет который формируется системой и выгружается 1 раз в месяц. Отчет большой - примерно 50 столбцов и более 3-4 тысяч строк, так как там много ненужной информации я создала его меньшую версию, она во вложении. Суть в том, что необходимо ...
Изменен: 03.11.2016
Читать сообщение на форуме или сайте.
Приостановка выполнения макроса до пересчета формул
Автор: kabanovga. Здравствуйте. Столкнулся со следующей проблемой. В Exel с помощью макроса выгружаю массив данных - продажи за период (Около 5000 строк). Далее макрос растягивает формулы рядом с этим массивом. Получается довольно тяжеловесный массив. Авто пересчет я отключать не хочу,  поэтому хочу просто по выполнению расчета копировать массив с формулами и вставлять значения (Они мне в дальнейшем не нужны все равно). Все было бы хорошо, но массив не успевает рассчитать значения, а макрос уже ...
Теги: Макрос, VBA
Изменен: 14.10.2016
Читать сообщение на форуме или сайте.
Сохранение файла и рассылка писем при помощи VBA.
... после некого действия которое запускается кнопкой (Макрос1 был написан только как ...  папку по датам, нужно чтобы макрос предлагал "сохранить как ...
Изменен: 07.10.2016
Читать сообщение на форуме или сайте.
Макрос по расчету суммы логарифмов, прошу помочь найти ошибку
Автор: rudolfxcp. Для научной деятельности возникла необходимость написать макрос. Вспомнил университетские годы и написал, но он не считает необходимые данные. Точнее ничего не запускает. Хотя должен! Так что, уважаемые форумчане, прошу помочь найти ошибку. Код корявый до ужаса, сам понимаю, что-то не знал вообще как определить, поэтому вводил жуткие костыли, но пусть даже корявый - должен работать. Excel 2007. По большому счету мне нужно только последнее значение (sum) которое должно ...
Теги: VBA, Макрос
Изменен: 22.09.2016
Читать сообщение на форуме или сайте.
Автоматическая подстановка формул
Автор: WaleraPP. Есть шаблон который заполняется данными которые вводит оператор в программе. После формирования документа появляется ошибка в одной из формул и приходится ручками ее исправлять (СТРОКА(#ССЫЛКА!)+1)))       на     СТРОКА(A23)+1))))  что не очень удобно. Хотелось иметь макрос который будет просто копировать в ячейку правильную формулу. Надеюсь меня поймете =)
Теги: Макрос
Изменен: 20.07.2016
Читать сообщение на форуме или сайте.
Макросом сцепить несвязанный (рваный) диапазон и добавить результат к ячейке, Не получается сделать перебор всех ячеек разорванного диапазона
Автор: simon100500. Здравствуйте! Делаю макрос, который после запуска позволит выбрать ... выбора диапазона. Повесил на кнопку формы такой макрос. Для связанного диапазона работает ... прилагаю. Подскажите, как сделать, чтобы макрос выполнялся и для несвязанного диапазона ...
Изменен: 19.07.2016
Читать сообщение на форуме или сайте.
Ошибка: невозможно получить свойство linest
Автор: Alejandro67. Уважаемые знатоки,  есть макрос, который отлично работал, но сегодня сто-то случилось и он начал выдавать ошибку. "Невозможно получить свойство LinEst класса worksheetFunction" Вопрос: как посмотреть на какой строчке исходных данных происходит ошибка? Собственно сам макрос: Sub Нахождение_А_коэффициента() [e:e].ClearContents: [e2] = "Номер события БР" [f:f].ClearContents: [f2] = "Знак" [g:g] ...
Изменен: 07.06.2016
Читать сообщение на форуме или сайте.
Страницы: 1 2 След.
Наверх