Поиск
Автор: 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
Читать сообщение на форуме или сайте.Автор: TheArhus. Добрый день!
Прошу решить следующую проблему:
Есть файл (во вложении)
Отталкиваясь от столбцов "K" и "O" нужно добавить строки по следующему условию:
Если в столбце "K" ячейки не равны 0 (нулю) и если в столбце "O" ячейки не равны 0 (нулю) то
К каждой такой строке нужно добавить строку сверху.
В этой строке ячейки со "Стоимость руб." нужно зачеркнуть.
Такую добавленную строку нужно форматировать как нижнюю, включая формат данных ...
Изменен: 23.10.2023
Читать сообщение на форуме или сайте.Автор: al.tarin. Здравствуйте!
Есть макрос, который удаляет лист после выполнения пересчета. Но появляется окно с запросом стоит ли удалить лист, ведь там есть данные.
Можно ли обойти это окно, тк нужно чтобы лист удалялся без вмешательства пользователя
Изменен: 25.09.2023
Читать сообщение на форуме или сайте.Автор: al.tarin. Здравствуйте! Необходимо чтобы сработал макрос после того, как произойдут вычисления в книге, но workbook_sheetcalculate не работает, помогите пожалуйста!
Изменен: 21.09.2023
Читать сообщение на форуме или сайте.Автор: magistr_ken. Привет, знатоки.
Нужна ваша помощь, слева то что написано буквами это СКЮ, сверху(2001,2002, и т.д) это код магазина. А то что между ними это продажи.
Мне нужно привести это в вид где все это стоит вертикально.
При этом для каждого СКЮ должны повторяться все коды магазинов,и рядом стоять продажи этого СКЮ в этот магаз.
Пример как должно выглядеть показал.
Изменен: 04.07.2023
Читать сообщение на форуме или сайте.Автор: 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")
' Находим последнюю заполненную строку в столбце A на листе ...
Изменен: 21.03.2023
Читать сообщение на форуме или сайте.Автор: Сергей Тихомиров. Здравствуйте, сразу к делу: нужно преобразовать данный код, чтобы он работал не только на первую строку, а на диапазон строк. Например до 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
...
Изменен: 22.11.2022
Читать сообщение на форуме или сайте.Автор: В. Здравствуйте.
Нужен VBA макрос скрипт который бы сохранял активный лист в виде отдельного файла, но вся информация в новом файле должна быть сохранена как текст а в исходном файле должно все остаться как было.
P.S. Находил примерно похожие решения, но они мне не подошли, либо меняли информацию в исходном листе, либо сохраняли формулы, либо сохраняли все листы, либо сохраняли листы с определенным именем(а не активный).
Изменен: 03.11.2022
Читать сообщение на форуме или сайте.Автор: Estelio Ammen. Подскажите, пожалуйста, как можно реализовать следующее:
Необходимо обновлять все запросы и подключения (я так понимаю это ActiveWorkbook.RefreshAll)
Далее сохранять файл.
Сделать цикличность выполнения макроса.
Есть несколько оговорок - изначально я сделал просто обновление запросов и сохранение книги, но в этом случае эксель не успевает обновить запросы перед сохранением, так что я предполагаю нужно сделать задержку между обновлением запросов и сохранением книги.
Вот что ...
Изменен: 18.10.2022
Читать сообщение на форуме или сайте.Автор: Сергей Бригса. Здравствуйте. Посоветуйте как подправить макрос. Имеется документ из более 100 листов с данными и оглавлением. В оглавлении указаны названия тех самых 100 листов, и столбец "кол-во печати". Нужно чтобы макрос проверил данный столбец и если в нем >0, то отправил тот лист на печать (напротив которого указана цифра) и столько копий, сколько указано. На данном форуме нашел нечто похожее, но там проверяется просто заполнена определённая ячейка или нет и печатает эти ...
Изменен: 10.10.2022
Читать сообщение на форуме или сайте. ... , есть у которых 12. Нужен макрос или формула, благодаря которой номер ... строчку + не будут добавляться пустые строки (если у товара не 12 ...
Изменен: 25.08.2022
Читать сообщение на форуме или сайте.Автор: Сергей Тихомиров. Здравствуйте, есть макрос копирования картинок по критерию и ... , который работает, но чем больше строк тем больше нагрузка, соответственно медленнее ... вариант упрощения или улучшение данного макроса? Подобных строк, как в файле, 300 ...
Изменен: 25.08.2022
Читать сообщение на форуме или сайте. ... Тихомиров. Здравствуйте, стоит задача составить макрос для копирования данных с одного ... равно иную и попытался этот макрос переделать по нужную мне задачу ... критерию в столбце С. Подобных строк в листе 2 будут около ... ;C:C")) ' Получение количества строк на листе 1 (подсчет значений ... Они равны то:
'в этой строке указанным ячейкам присвоить значения из ... 'конец условия
Next cRecs 'следующая строка на Листе2
'После окончания проверки ...
Изменен: 22.08.2022
Читать сообщение на форуме или сайте. ... ]) преобразовать строку с формулами в значения. При выполнении макроса цикл не ... уходит в ошибку.
Помогите подкорректировать макрос.Private Sub Worksheet_Change(ByVal Target ...
Изменен: 14.07.2022
Читать сообщение на форуме или сайте. ... :** (что соответствует «нашим» 13:** — 23:**)
Строки (события) идут в том порядке ... перемешиваются с событиями ночи.
Нужен макрос, который приводит время в стандартный ...
Изменен: 16.06.2022
Читать сообщение на форуме или сайте. ... :** (что соответствует «нашим» 13:** — 23:**)
Строки (события) идут в том порядке ... ночью.
Есть идеи как (наверное макросом) приводить время в вид когда ...
Изменен: 15.06.2022
Читать сообщение на форуме или сайте.Автор: 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& ...
Изменен: 07.06.2022
Читать сообщение на форуме или сайте.Автор: Сырым Жанжигитов. Добрый день! Помогите пожалуйста, написать макрос с такой целью: Макрос ищет слова имеющие определенную букву и выделяет найденные слова красный цветом.Например, имеющие букву "и". Обязательно должен выделить все слово,имеющие букву "и", именно слова должен выделить, а не букву и.
Изменен: 16.03.2022
Читать сообщение на форуме или сайте.Автор: Сабит Алдонгров. Добрый день! Хочу автоматизировать таблицу для работы с заказами. Есть несколько магазинов, есть остатки в данных магазинах, есть остатки на складе. Необходимо добавлять к заказу по одной позиции вплоть до Того момента пока заказ не будет соответствовать необходимому количеству.
Помогите пожалуйста в решении данного вопроса!
Изменен: 01.03.2022
Читать сообщение на форуме или сайте. ... «сливаться» информация из пяти. Количество строк в карточке динамично и в ... кто идет за кем. Нужен макрос? Который будет просматривать непустые сроки ...
Изменен: 20.02.2022
Читать сообщение на форуме или сайте. ... Откупщикова. Здравствуйте! Мне необходимо написать макрос для статистической обработки данных. При ... третьем столбце продолжалось, пока следующая строка в первом столбце не будет ... он уже переходит на следующую строку. Я попыталась решить эту проблему ... ошибку 1004 и прекращает выполнение макроса. В чем может быть ошибка ... очевидного.
Первоначальный циклSub Цикл3()
'
' Цикл3 Макрос
'
' Сочетание клавиш: Ctrl+с
' Начало ... SubИзмененный цикл
Sub Цикл3()
'
' Цикл3 Макрос
'
' Сочетание клавиш: Ctrl+с
' ...
Изменен: 07.02.2022
Читать сообщение на форуме или сайте.Автор: Ирина Откупщикова. Необходимо написать макрос для статистической обработки данных. Мне ... , которая при переходе в следующую строку должна оставаться на том же ...
Изменен: 07.02.2022
Читать сообщение на форуме или сайте.Автор: 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
Читать сообщение на форуме или сайте.Автор: Счёёёё Сумм. Приветствую!
Прошу показать какой макрос нужен для выполнения приведённого примера ниже!
В ячейках листа в одной колонке введено большое количество данные в разных интервалах удалённости.
Необходимо повторить значение выделенной первой ячейки по столбцу в низ до нового значения, после считать новое значение и повторить до следующего, ограничив общее количество повторений или повторений нового значения
Самостоятельно пытался сделать, но я так и не понял как.
Файл как пример ...
Изменен: 18.09.2021
Читать сообщение на форуме или сайте. ... ), на этом листе прописан макрос который скрывает пустые строки в диапазоне ячеек ... таблицы. Задача заключается в том, чтобы макрос ... данные. Я пытался задать запуск макроса при изменении значения в диапазоне ... сильно не кидаться тапками, в макросах еще толком ничего не понимаю ...
Изменен: 17.09.2021
Читать сообщение на форуме или сайте.Автор: роман иванов. Добрый день!
Есть следующая ситуация:
книга эксель с некоторым количеством листов. на каждом листе несколько (пока 8, но возможно будет больше, и, возможно, не на всех листах одинаковое количество) диаграмм, на каждой диаграмме несколько рядов (количество рядов не одинаковое для всех диаграмм), все ряды ссылаются на диапазоны одинаковой длины, (но разных столбцов)
Необходим макрос, который будет протягивать эти диапазоны до указанной строчки (указывать через inputBox).
Для ...
Изменен: 12.09.2021
Читать сообщение на форуме или сайте.Автор: роман иванов. Добрый день!
Есть следующая ситуация:
книга эксель в с некоторым количеством листов. на каждом листе несколько (пока 8, но возможно будет больше) диаграмм, на каждой диаграмме несколько рядов.
Нужен макрос, для задания максимума границы оси X (в формате даты, через inputBox) на всех диаграммах ПОЧТИ всех листов.
С возможностью добавлять листы - исключения, на которых не нужно изменять ось (исключения прописать уже в теле макроса без imputBox, так как они не будут часто ...
Изменен: 12.09.2021
Читать сообщение на форуме или сайте. ... таблица (прикрепляю). Как прописать макросом объединение строк с удалением дубликатов:
1) Объединение ...
Изменен: 03.03.2021
Читать сообщение на форуме или сайте. ... , добрый день. Подскажите, пожалуйста, есть макрос, который при заполненном столбце А ... 2 в те же самые строки, где находились значения на листе ... макрос копировал с листа 1 на лист 2 в последнюю пустую строку ...
Изменен: 04.02.2021
Читать сообщение на форуме или сайте.