Страницы: 1 2 3 4 5 След.
Поиск
Макрос для печати четных и нечетных страниц с разными полями
Автор: Reaper. Добрый день, нужен макрос для печати четных и нечетных страниц с разными полями. Есть такой, но он печатает все листы как четные. Я плохо разбираюсь в кодах и вообще не пойму как его исправить. Помогите, пожалуйста!Sub PrintActiveSheet() Dim ws As Worksheet Dim oddPages As Boolean Set ws = ActiveSheet oddPages = False With ws.pageSetup .TopMargin = Application.InchesToPoints(0.393700787401575) .BottomMargin = Application.InchesToPoints(0.393700787401575) End With If ws.Index Mod 2 ...
Теги: Макрос
Изменен: 30.01.2024
Читать сообщение на форуме или сайте.
вернуть значение по совпадению части строки (началу строки), подставить в результирующую таблицу найденные совпадения из "словаря"
Автор: focus_487164. всем добрый день. есть таблица, в которую выгружены логи проверок по заявкам. Данные логи содержат название проверки в начале строки, и уникальные значения (номер заявки, ФИО и прочее) в конце строки.  Вопрос - как сопоставить начало строки (название проверки) со словарем (в котором названия этих проверок) и вернуть значение (название проверки) в результирующую таблицу. Пример в приложенном файле.  попробовала искать по маске "*"&А1&"*", но половину не ...
Теги: excel
Изменен: 20.12.2023
Читать сообщение на форуме или сайте.
Макрос на добавление строк выше каждой отсортированной строки, Макрос на добавление строк выше каждой отсортированной строки с заполнением данными и форматом.
Автор: TheArhus. Добрый день! Прошу решить следующую проблему: Есть файл (во вложении) Отталкиваясь от столбцов "K" и "O" нужно добавить строки по следующему условию: Если в столбце "K" ячейки не равны 0 (нулю) и если в столбце "O" ячейки не равны 0 (нулю) то К каждой такой строке нужно добавить строку сверху. В этой строке ячейки со "Стоимость руб." нужно зачеркнуть. Такую добавленную строку нужно форматировать как нижнюю, включая формат данных ...
Изменен: 23.10.2023
Читать сообщение на форуме или сайте.
Удаление листа, Как можно сделать так чтобы лист удалялся без всплывающего окна
Автор: al.tarin. Здравствуйте! Есть макрос, который удаляет лист после выполнения пересчета. Но появляется окно с запросом стоит ли удалить лист, ведь там есть данные.  Можно ли обойти это окно, тк нужно чтобы лист удалялся без вмешательства пользователя
Теги: Макрос
Изменен: 25.09.2023
Читать сообщение на форуме или сайте.
Запуск макроса после расчетов в книге
Автор: al.tarin. Здравствуйте! Необходимо чтобы сработал макрос после того, как произойдут вычисления в книге, но workbook_sheetcalculate не работает, помогите пожалуйста!
Теги: Макрос
Изменен: 21.09.2023
Читать сообщение на форуме или сайте.
Задача по экселю, статистика по клиентам по заданным условиям, Помощь в формировании формулы статистического подсчета
Автор: RinatSibay. Здравствуйте, подскажите пожалуйста как решить такую задачу, уже больше 2 недель не могу найти возможных путей решения: Нужно подсчитать количество людей получивших консультацию/патронаж/лекцию/... в определенное время и месте. Я смог найти количество проведенных консультаций и по датам и по местам, но не могу их сопоставить с количеством получшившим помощь людей. Тоесть если у нас 6 человек пришли за услугой, то нужно узнать сколько из них получили консультацию в 1 квартале ...
Изменен: 19.08.2023
Читать сообщение на форуме или сайте.
Траспонирование таблицы с повторяющимися значениями, Помогите привести таблицу в нужны формат
Автор: magistr_ken. Привет, знатоки. Нужна ваша помощь, слева то что написано буквами это СКЮ, сверху(2001,2002, и т.д) это код магазина. А то что между ними это продажи. Мне нужно привести это в вид где все это стоит вертикально. При этом для каждого СКЮ должны повторяться все коды магазинов,и рядом стоять продажи этого СКЮ в этот магаз. Пример как должно выглядеть показал.
Изменен: 04.07.2023
Читать сообщение на форуме или сайте.
Как создать таблицу с 50+ строками, Не могу перенести полную обновляемую таблицу из интернета
Автор: Sur Arutyuni. Здравствуйте,  Мне нужно создать таблицу, которая обновляется, но проблема в том, что на странице из интернета, с которой я импортируют таблицу видно только 50 строк, а для того чтобы увидеть все 1200 строк нужно нажимать “show more”(тогда всё появляется), но excel распознает только первые 50 строк, когда вставляешь ссылку на импорт.Как сделать так, чтобы обновляемая таблица распознавала все строки сразу, чтобы даже  «show more” не нужно было нажимать
Изменен: 19.04.2023
Читать сообщение на форуме или сайте.
Сокращение (адаптация) длинной формулы для макроса в VBA, При активации записанной макрорекордером формулы появляется ошибка: "Run-time error '1004' Application-defined or object-defined error"
Автор: i molecule. Доброго времени суток! Есть довольно длинная формула (1580 знаков), которая никак не хочет работать в VBA, даже после обработки макрорекордером – вылетает ошибка 1004. Формула, вставляемая вручную (есть в файле-примере):  =ЕСЛИ(ИЛИ(ПСТР([@Номер];1;2)="05";ПСТР([@Номер];1;2)="06";ПСТР([@Номер];1;2)="07";ПСТР([@Номер];1;5)="08";ПСТР([@Номер];1;5)="09";ПСТР([@Номер];1;2)="10& ...
Изменен: 18.04.2023
Читать сообщение на форуме или сайте.
Макрос на одном ПК работает корректно, на другом возвращает значения в книгу источник
Автор: Артём Б. Всем добрый день! Есть легкое непонимание, т.к. на одном пк макрос работает корректно и переносит значения ячеек из таблицы "Таблицаисточник" в "Таблицаприемник". При попытке скопипастить макрос с заменой путей на актуальный, выходит ошибка 9, т.к. макрос не видит листа "Лист1" в "Таблицаисточник", но если добавить лист под названием "Лист1" - все значения исправно встают куда им нужно, но не в ту книгу. Вопрос в следующем, ...
Теги: Макрос
Изменен: 21.03.2023
Читать сообщение на форуме или сайте.
Цикл For для нескольких строк
Автор: Сергей Тихомиров. Здравствуйте, сразу к делу: нужно преобразовать данный код, чтобы он работал не только на первую строку, а на диапазон строк. Например до 10. Понимаю что скорее всего нужно взять это все в массив и использовать\внедрить For Each, но никак не получается разобраться. Заранее благодарен.Private Sub CommandButton1_Click() Dim m As Integer Dim x As Integer Dim out As Integer m = Cells(2, 1) x = Cells(2, 2) out = Cells(2, 3) For i = m To x Step -x If i > 0 Then i = i - out ...
Теги: EXCEL, VBA, Макрос
Изменен: 22.11.2022
Читать сообщение на форуме или сайте.
Сохранение одного листа как отдельный файл.
Автор: В. Здравствуйте. Нужен VBA макрос скрипт который бы сохранял активный лист в виде отдельного файла, но вся информация в новом файле должна быть сохранена как текст а в исходном файле должно все остаться как было. P.S. Находил примерно похожие решения, но они мне не подошли, либо меняли информацию в исходном листе, либо сохраняли формулы, либо сохраняли все листы, либо сохраняли листы с определенным именем(а не активный).
Теги: VBA, Макрос, EXCEL
Изменен: 03.11.2022
Читать сообщение на форуме или сайте.
Обновление запросов и подключений с последующим сохранением
Автор: Estelio Ammen. Подскажите, пожалуйста, как можно реализовать следующее: Необходимо обновлять все запросы и подключения (я так понимаю это ActiveWorkbook.RefreshAll) Далее сохранять файл. Сделать цикличность выполнения макроса. Есть несколько оговорок - изначально я сделал просто обновление запросов и сохранение книги, но в этом случае эксель не успевает обновить запросы перед сохранением, так что я предполагаю нужно сделать задержку между обновлением запросов и сохранением книги. Вот что ...
Изменен: 18.10.2022
Читать сообщение на форуме или сайте.
Печать по условию (макрос), Печать документа по условию: определенные листы и копии
Автор: Сергей Бригса. Здравствуйте. Посоветуйте как подправить макрос. Имеется документ из более 100 листов с данными и оглавлением. В оглавлении указаны названия тех самых 100 листов, и столбец "кол-во печати". Нужно чтобы макрос проверил данный столбец и если в нем >0, то отправил тот лист на печать (напротив которого указана цифра) и столько копий, сколько указано. На данном форуме нашел нечто похожее, но там проверяется просто заполнена определённая ячейка или нет и печатает эти ...
Изменен: 10.10.2022
Читать сообщение на форуме или сайте.
Макрос для переноса значения из строки в столбец, с добавлением новых строк
Автор: Мария Рычагова. Добрый день! Есть таблица, в которой находится 12 продавцов одного товара, фото во вложении. Есть товары, у которых 1 продавец, есть у которых 12. Нужен макрос или формула, благодаря которой номер продавца из столбца будет переносится на новую строчку + не будут добавляться пустые строки (если у товара не 12 продавцов, а меньше) + будут автоматически заполнятся данные о товаре, т.е. будут повторятся все значения, которые есть в других столбцах. 
Теги: Макрос
Изменен: 25.08.2022
Читать сообщение на форуме или сайте.
Упрощение макроса вставки картинок по критерию
Автор: Сергей Тихомиров. Здравствуйте, есть макрос копирования картинок по критерию и централизация картинок в ячейке, который работает, но чем больше строк тем больше нагрузка, соответственно медленнее и тд. Вопрос: Есть ли вариант упрощения или улучшение данного макроса? Подобных строк, как в файле, 300+Sub Вставка2() Dim i&, r As Range, shp As Shape For i = 4 To 393 Set r = Sheets(2).Cells.Find(Cells(i, 3).Value, LookAt:=xlWhole) For Each shp In Sheets(2).Shapes If shp.TopLeftCell.Address = r ...
Изменен: 25.08.2022
Читать сообщение на форуме или сайте.
Макрос копирования данных с критериями
Автор: Сергей Тихомиров. Здравствуйте, стоит задача составить макрос для копирования данных с одного листа по критериям в другой. На просторах интернета нашел похожую, но все равно иную и попытался этот макрос переделать по нужную мне задачу. И вот он вроде бы работает, но криво. Прошу помощи разобраться. Сама задача звучит так:  Нужно чтобы данные с листа 2 копировались на лист 1 по критерию в столбце С. Подобных строк в листе 2 будут около 250, а листе 1 зависит от заказа. Sub Копирование() ...
Изменен: 22.08.2022
Читать сообщение на форуме или сайте.
Преобразование формул в значения vba
Автор: twistd. Добрый день. Необходимо при изменении значения в ячейках столбца1 (Таблица2[Столбец1]) преобразовать строку с формулами в значения. При выполнении макроса цикл не заканчивается и уходит в ошибку. Помогите подкорректировать макрос.Private Sub Worksheet_Change(ByVal Target As Range) Dim KeyCells As Range Set KeyCells = Range("Таблица2[Столбец1]") If Not Application.Intersect(KeyCells, Range(Target.Address)) _ Is Nothing Then Range(ActiveCell, ActiveCell.End ...
Теги: VBA, Макрос
Изменен: 14.07.2022
Читать сообщение на форуме или сайте.
VBA макрос вставляет строку на основе данных из ячейки
Автор: Alexander Kruglov. Привет друзья, есть умная таблица (прайс-лист) примерно 500 строк и 20 колонок, вся она создана на основе данных других с др  листов. Обновляю я ее протягиванием и выглядит примерно так:  SKU ID   NAME  QTY  тд  12323  HJWW001,HJWW003  text  5  text  SKU  ID  NAME  QTY  тд    12323-HJWW001  HJWW001  text  5  text   12323-HJWW003  HJWW003  text  5  text Я нашел код, который работает, но у него есть минусы, поэтому прошу помощи в доработке 1. самое главное он очень сильно ...
Теги: VBA, excel
Изменен: 03.07.2022
Читать сообщение на форуме или сайте.
Приведение времени внутри суток к 24-часовому виду, с помощью VBA
Автор: Иван Мельников. В CSV-выгрузке с Индии время событий (убраны из файла-примера, оставил только дату и время) приходит в совершенно неудобном временном формате: 1) новые сутки они начинают с 12:00 (наша первая минута ночи 00:01 у них идёт как 12:01) — тут проблема в том, что точно так же обозначается первая минута после полудня. То есть, дальше часы ночного/утреннего времени идут 01:** — 09:**, дальше 10:**, дальше 11:**, а дальше снова 12:** (только уже дня). И возникает путаница во ...
Изменен: 16.06.2022
Читать сообщение на форуме или сайте.
Приведение времени внутри суток к 24-часовому виду, с помощью VBA
Автор: Иван Мельников. В CSV-выгрузке с Индии приходят события в совершенно неудобном временном формате: 1) новые сутки они начинают с 12:00 2) дальше идут 01:** — 09:**, дальше 10:**, дальше 11:**, а дальше снова 12:** (только уже дня). 3) далее снова 01:** — 11:** (что соответствует «нашим» 13:** — 23:**) Строки (события) идут в том порядке, в каком они происходили (сверху вниз от новых и в историю) — иначе вообще было бы не разобрать что за чем следует (и что было до полудня, а что было после ...
Изменен: 15.06.2022
Читать сообщение на форуме или сайте.
Макрос - cоздание новых файлов из лиcтов через цикл
Автор: sekutor. Вcем привет. Cтолкнулcя c задачей, которую пытаюcь решить c помощью макроcа. Еcть файл X.xlsb, в котором 100 вкладок: "АВ01", "АВ02", ..., "АВ50" и "АC01", "АC02", ..., "АC50". Нужно cоздать 50 файлов c именами "X01", "X02", ..., "X50", в каждом из которых будет две вкладки: "АВ01" и "АC01" в файле "X01", "АВ02" и "АC02" в файле "X02& ...
Теги: Макрос, VBA
Изменен: 07.06.2022
Читать сообщение на форуме или сайте.
Макрос заполнения ячеек по поиску по первым символам из другой таблицы
Автор: Евгений Г. Доброго времени суток, Уважаемые форумчане! Не силен в написаниях макросов. Прошу вашей помощи. Есть таблица, в которой есть однотипные значения, начинающиеся на одни и те же символы. Есть отчет в который нужно эти однотипные значения снести под одну строку. Делается это каждый раз вручную. Прошу вас помочь написать макрос, с помощью которого можно будет делать это автоматически. Количество строк всегда разное, количество столбцов одинаковое ( 79 ) Если можно, то прописать, ...
Изменен: 28.03.2022
Читать сообщение на форуме или сайте.
МАКРОС ВОРД, Добрый день! Помогите пожалуйста, написать макрос с такой целью: Макрос ищет слова имеющие определенную букву и выделяет найденные слова красный цветом. Обязательно должен выделить все слово,имеющие букву "и", именно слова должен выделить, а не букву и.
Автор: Сырым Жанжигитов. Добрый день! Помогите пожалуйста, написать макрос с такой целью: Макрос ищет слова имеющие определенную букву и выделяет найденные слова красный цветом.Например, имеющие букву "и". Обязательно должен выделить все слово,имеющие букву "и", именно слова должен выделить, а не букву и. 
Теги: Макрос
Изменен: 16.03.2022
Читать сообщение на форуме или сайте.
Автоматическое заполнение Заказника, Необходимо автоматизировать заказ на основании остатков и количественного стандарта
Автор: Сабит Алдонгров. Добрый день! Хочу автоматизировать таблицу для работы с заказами. Есть несколько магазинов, есть остатки в данных магазинах, есть остатки на складе. Необходимо добавлять к заказу по одной позиции вплоть до Того момента пока заказ не будет соответствовать необходимому количеству. Помогите пожалуйста в решении данного вопроса!
Теги: Макрос
Изменен: 01.03.2022
Читать сообщение на форуме или сайте.
Загрузка данных из таблицы excel в таблицу excel (макрос?), защита ячеек
Автор: tango_nefer. Добрый день! Задача: Есть файлы по 5 пользователям, в одном файле: карточка, акты и несколько отчетов из этих актов. Нужно: 1.       закрыть у ячеек, в которых есть формулы возможность корректировки 2.       создать отчеты (такого же формата) в которые будет «сливаться» информация из пяти. Количество строк в карточке динамично и в течение года будет прирастать, поэтому нет возможности жестко закрепить в сводном отчете кто идет за кем. Нужен макрос? Который будет ...
Изменен: 20.02.2022
Читать сообщение на форуме или сайте.
При переходе в следующую строку ссылка должна оставаться на том же месте
... Откупщикова. Здравствуйте! Мне необходимо написать макрос для статистической обработки данных.  При ... придется в разных местах в таблице. Мне потребовалось ввести цикл типа ... код). Однако Excel  выдает ошибку 1004 и прекращает выполнение макроса. В чем ... очевидного. Первоначальный циклSub Цикл3() ' ' Цикл3 Макрос ' ' Сочетание клавиш: Ctrl+с ' Начало ... SubИзмененный цикл Sub Цикл3() ' ' Цикл3 Макрос ' ' Сочетание клавиш: Ctrl+с ' Начало ...
Теги: Макрос
Изменен: 07.02.2022
Читать сообщение на форуме или сайте.
Ссылка на ячейку, которая при переходе в следующую строку должна оставаться на том же месте.
Автор: Ирина Откупщикова. Необходимо написать макрос для статистической обработки данных. Мне нужно, чтобы расчет по формуле происходил пока ячейка в соседнем столбце не пустая, поэтому использую операции DO until - Loop. Адресация ячеек относительная, поэтому возникла проблема в этом цикле с ссылкой на ячейку, которая при переходе в следующую строку должна оставаться на том же месте. То есть мне нужно, чтобы расчет в 3м столбце (см прикрепленную картинку) по формуле происходил до тех пор, пока ...
Теги: Макрос
Изменен: 07.02.2022
Читать сообщение на форуме или сайте.
Автоматический перенос данных из таблиц Word в столбцы Excel
Автор: Padavone. Здравствуйте, уважаемые программисты! Кто может помочь в решении вопроса при использовании Word и Excel 2019? Как автоматизировать следующие действия? Открыть файл Word, в его таблицах определить только параметры и их результаты/значения (иной текст игнорировать), открыть итоговый файл Excel, в ячейку А2 внести имя файла Word, в ячейку В1 и далее вправо внести выявленные в таблицах файла Word параметры, в ячейку В2 и далее вправо, внести выявленные в таблицах файла Word ...
Изменен: 18.12.2021
Читать сообщение на форуме или сайте.
Как удалить из таблицы необходимые строки
Автор: Din Adiev.  Добрый день! Возникла следующая проблема: Имеется таблица с двумя столбами, наименования компаний N-ная сумма  Для примера приведу несколько:ГАТЕ Иншаат Таахют Санайи ве Тиджарет4 099 330,00Сервисный Центр “ТурбоРемонт”3 930 654,00Бетеге холдинг3 565 210,00ISTEK Construction3 433 600,00НАО Государственная корпорация2 856 000,00Baku Consolidate Supply and Services2 460 000,00ККТС2 370 383,97  Необходимо удалить из данной таблицы определенные компании, имеющиеся в другой ...
Теги: Макрос
Изменен: 09.12.2021
Читать сообщение на форуме или сайте.
Страницы: 1 2 3 4 5 След.
Наверх