Поиск
Автор: Tomen992. Добрый день, уважаемые форумчане.
Тема избитая, но, к сожалению, подходящего решения не смог найти.
Пытался сам из кусков других тем получить желаемое, но пока так и не смог.
Ситуация следующая: есть таблица (№1), которая с помощью формул (по условиям) наполняется данными из другой таблицы (№2). Таблицы все умные.
И есть третья таблица (№3), которая считает, сколько значений подходят под условия переноса данных (проверка).
Пытаюсь сделать следующий макрос:
1. При открытии ...
Изменен: 26.05.2025
Читать сообщение на форуме или сайте.Автор: 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 = ...
Изменен: 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
Читать сообщение на форуме или сайте.Автор: 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
Читать сообщение на форуме или сайте.Автор: 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
Читать сообщение на форуме или сайте.Автор: 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
Читать сообщение на форуме или сайте.Автор: Frommas. Здравствуйте!
Подскажите, возможно ли сделать такой макрос, что бы данные из файла эксель (вложение), автоматически экспортировались в один и тот же CSV файл с настройками частоты экспорта от 1 до 600 сек, без непосредственного открытия файла.
И кто бы мог в этом помочь, сам эти штуки писать не умею.
Во вложении файл эксель исходный и CSV в виде который нужен
Подобие как делает эта штука: https://xltools.net/ru/export-to-csv/
Только весь ручной процесс макрос должен делать ...
Изменен: 14.02.2017
Читать сообщение на форуме или сайте. ... кнопкой OK?
Нигде не смог в интернете найти именно добавление надписи макросом ... .
Знаю некоторые базовые вещи по макросам, поэтому не ... был создан при записи макроса нажатием соответствующей кнопки :)
Вставка синего ценника
Sub ... Auto_Open()
'
' Макрос создающий фигуру с ценником ... открытии или при нажатии на кнопку
' Сочетание клавиш: Ctrl+f
'
ActiveSheet ...
Изменен: 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 и иногда ...
Изменен: 11.12.2016
Читать сообщение на форуме или сайте.Автор: Samangeldy. Добрый день! У меня возникла проблема с решением рабочей задачи, и так как очень часто темы на данном форуме мне помогали в подобных вещах решила написать, так как в этот раз не нашла схожей темы в прошлых обсуждениях.
Задача: Имеется отчет который формируется системой и выгружается 1 раз в месяц. Отчет большой - примерно 50 столбцов и более 3-4 тысяч строк, так как там много ненужной информации я создала его меньшую версию, она во вложении. Суть в том, что необходимо ...
Изменен: 03.11.2016
Читать сообщение на форуме или сайте.Автор: kabanovga. Здравствуйте. Столкнулся со следующей проблемой. В Exel с помощью макроса выгружаю массив данных - продажи за период (Около 5000 строк). Далее макрос растягивает формулы рядом с этим массивом. Получается довольно тяжеловесный массив. Авто пересчет я отключать не хочу, поэтому хочу просто по выполнению расчета копировать массив с формулами и вставлять значения (Они мне в дальнейшем не нужны все равно).
Все было бы хорошо, но массив не успевает рассчитать значения, а макрос уже ...
Изменен: 14.10.2016
Читать сообщение на форуме или сайте. ... после некого действия которое запускается кнопкой (Макрос1 был написан только как ... папку по датам, нужно чтобы макрос предлагал "сохранить как ...
Изменен: 07.10.2016
Читать сообщение на форуме или сайте.Автор: rudolfxcp. Для научной деятельности возникла необходимость написать макрос. Вспомнил университетские годы и написал, но он не считает необходимые данные. Точнее ничего не запускает. Хотя должен! Так что, уважаемые форумчане, прошу помочь найти ошибку. Код корявый до ужаса, сам понимаю, что-то не знал вообще как определить, поэтому вводил жуткие костыли, но пусть даже корявый - должен работать. Excel 2007.
По большому счету мне нужно только последнее значение (sum) которое должно ...
Изменен: 22.09.2016
Читать сообщение на форуме или сайте.Автор: WaleraPP. Есть шаблон который заполняется данными которые вводит оператор в программе. После формирования документа появляется ошибка в одной из формул и приходится ручками ее исправлять (СТРОКА(#ССЫЛКА!)+1))) на СТРОКА(A23)+1)))) что не очень удобно. Хотелось иметь макрос который будет просто копировать в ячейку правильную формулу.
Надеюсь меня поймете =)
Изменен: 20.07.2016
Читать сообщение на форуме или сайте.Автор: simon100500. Здравствуйте!
Делаю макрос, который после запуска позволит выбрать ... выбора диапазона.
Повесил на кнопку формы такой макрос. Для связанного диапазона работает ... прилагаю.
Подскажите, как сделать, чтобы макрос выполнялся и для несвязанного диапазона ...
Изменен: 19.07.2016
Читать сообщение на форуме или сайте.Автор: Alejandro67. Уважаемые знатоки, есть макрос, который отлично работал, но сегодня сто-то случилось и он начал выдавать ошибку. "Невозможно получить свойство LinEst класса worksheetFunction"
Вопрос: как посмотреть на какой строчке исходных данных происходит ошибка?
Собственно сам макрос:
Sub Нахождение_А_коэффициента()
[e:e].ClearContents: [e2] = "Номер события БР"
[f:f].ClearContents: [f2] = "Знак"
[g:g] ...
Изменен: 07.06.2016
Читать сообщение на форуме или сайте.