Страницы: 1 2 3 4 5 След.
Поиск
Почему на Integer считает, а на Double нет
Автор: Astronaut. Вот мой код вба:Sub Macros2()         Dim x As Integer         x = Selection.Value         Selection.FormulaR1C1 = Empty         Selection.FormulaR1C1 = "=RC[-2]*" & x End SubСчитает без проблем, но не когда в ячейке дробные числа. Если поменять Integer на Double или любой другой, то выбивает ошибку 1004, я не понимаю в чем проблема. На Double отдельно может перемножать формулы, отдельно может перемножать вводные, но и то, и то вывести просто нет. Я только ...
Теги: Макрос
Изменен: 25.04.2024
Читать сообщение на форуме или сайте.
Формула должна выдавать 0 или 1 в зависимости от попадания в заданный диапазон, Функция ЕСЛИ с множеством условий выдает #ЗНАЧ!
Автор: Ankot. Здравствуйте!Дано Факт 4…6 5 ≤3 4 ≥5 4Есть два столбца "Дано" и "Факт". "Дано" должно быть именно в одной ячейке, разбивать на две нельзя (дописал это после первого комментария). Формула должны выдавать 0 если число в столбце "Факт" попадает в диапазон столбца "Дано". Если число не попадает в диапазон, то 1. Прикрепил файл со всеми моими попытками решить эту задачу. Формулы в которых "…", "≤", "≥" по ...
Изменен: 23.04.2024
Читать сообщение на форуме или сайте.
Макрос для печати четных и нечетных страниц с разными полями
Автор: 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
Читать сообщение на форуме или сайте.
Формула ЕСЛИ. Интервал между значениями
Автор: Absolut. Добрый день! Есть несколько условий: от 100% до 110% то 5 000  от 111% до 120% то 7 000 Как правильно прописать в формуле ЕСЛИ  интервал логических  значений между задан  от и до  ЕСЛИ(И(Y4=100%-110%;AF4=111%-120%)  ???
Теги: ЕСЛИ
Изменен: 12.09.2023
Читать сообщение на форуме или сайте.
Траспонирование таблицы с повторяющимися значениями, Помогите привести таблицу в нужны формат
Автор: magistr_ken. Привет, знатоки. Нужна ваша помощь, слева то что написано буквами это СКЮ, сверху(2001,2002, и т.д) это код магазина. А то что между ними это продажи. Мне нужно привести это в вид где все это стоит вертикально. При этом для каждого СКЮ должны повторяться все коды магазинов,и рядом стоять продажи этого СКЮ в этот магаз. Пример как должно выглядеть показал.
Изменен: 04.07.2023
Читать сообщение на форуме или сайте.
Сокращение (адаптация) длинной формулы для макроса в VBA, При активации записанной макрорекордером формулы появляется ошибка: "Run-time error '1004' Application-defined or object-defined error"
... вручную (есть в файле-примере):  =ЕСЛИ(ИЛИ(ПСТР([@Номер] ... 2800 знаков, которая имеет конструкцию ЕСЛИ(ИЛИ(ПСТР([@НОМЕР] ... ;...(ЕСЛИ(ПСТР([@НОМЕР]...))))), содержащую ... уровней ЕСЛИ, но при этом записалась с первого раза и в макросе ... работает отлично. Предполагается, что макрос будет работать в ... что бы она корректно вставлялась макросом в умную таблицу в разных ...
Изменен: 18.04.2023
Читать сообщение на форуме или сайте.
Подсчёт очков в таблице футбольных прогнозов. ЕСЛИМН или ЕСЛИ(И(ИЛИ(И(, Хочется автоматизировать процесс, но не получается. Где ошибка?
Автор: shoretz. Здраствуйте. Ведём в группе конкурс прогнозов. Как считаются очки: 7 очков Угадал победителя и счёт 5 очков Угадал победителя и разница между мячами одинаковая 5 очков Ничья, разница между голами 0 (ну то же, что и выше) 3 очка Угадал победителя 0 очков Не угадал ничего Сама формула выглядит так: ЕСЛИ(И(D9=$D$1;F9=$F$1);7;ЕСЛИ(И(ИЛИ(И($D$1>$F$1;D9>F9);И($D$1<$F$1;D9<F9));(МАКС($D$1;$F$1)-МИН($D$1;$F$1)=МАКС(D9;F9)-МИН(D9;F9)));5;ЕСЛИ(ИЛИ(И($D$1>$F$1;D9>F9);И ...
Теги: ЕСЛИ
Изменен: 01.04.2023
Читать сообщение на форуме или сайте.
Макрос на одном ПК работает корректно, на другом возвращает значения в книгу источник
... , т.к. на одном пк макрос работает корректно и переносит значения ... ;Таблицаприемник". При попытке скопипастить макрос с заменой путей на актуальный ... , выходит ошибка 9, т.к. макрос не видит листа "Лист1 ... ; в "Таблицаисточник", но если добавить лист под названием " ...
Теги: Макрос
Изменен: 21.03.2023
Читать сообщение на форуме или сайте.
Функция ЕСЛИ с датами
Автор: Сарул Сарулов. Добрый день, коллеги! Помогите пожалуйста с написанием формулы. По задумке она должна считать последний день срока оплаты покупателя. Где столбец Е = покупатель, столбец H = дата от которой считается срок отсрочки. Получилось следующее: в ячейках столбца I = ЕСЛИ($E2 = "Покупатель1"; $H2+30; ЕСЛИ($E2 = "Покупатель2"; $H2+40; ЕСЛИ($E2 = Покупатель3"; $H2+20))) Проблема в том, что при пустой ячейки в столбце H, функция возвращается значение к дате ...
Теги: ЕСЛИ
Изменен: 06.03.2023
Читать сообщение на форуме или сайте.
получение значений функции заданной табличным способом
Автор: Isa Balaev. Здравствуйте! Мне нужно выбрать постоянное заданное число (а и в) в зависимости от протяженности трубопровода: 1 - 100 м 100 - 500 м 501 - 1000 м 1001 - 2000 м 2001 - 4000 м 4001 - 10000 м Во вложенном файле есть таблица исходных значений а и в, а внизу я пытался написать формулу для выбора "а", но не получается... Сможете помочь?
Теги: ЕСЛИ
Изменен: 20.01.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 ... ". Нужно чтобы макрос проверил данный столбец и если в нем > ...
Изменен: 10.10.2022
Читать сообщение на форуме или сайте.
Макрос для переноса значения из строки в столбец, с добавлением новых строк
... , есть у которых 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
Читать сообщение на форуме или сайте.
Макрос копирования данных с критериями
... Тихомиров. Здравствуйте, стоит задача составить макрос для копирования данных с одного ... равно иную и попытался этот макрос переделать по нужную мне задачу ... (cRecs, 2) Then 'сверка критериев если Они равны то: 'в этой ...
Изменен: 22.08.2022
Читать сообщение на форуме или сайте.
Определение наличия даты в списке, Пишу формулу на определение нахождения даты в списке дат
Автор: Ro Pa. Добрый день. Пишу формулу на проверку наличия даты в списке. Но выдает ошибку. Ниже формула и краткое описание Вот формула: =ЕСЛИ(ЕЧИСЛО(ПОИСКПОЗ(&ДАТА(ГОД(B9); МЕСЯЦ(B9)-E9; ДЕНЬ(B9)); $L$8:$W$8; 0));1; "-") Ошибка возникает на этапе первого условия (&ДАТА(ГОД(B11); МЕСЯЦ(B11)-E11; ДЕНЬ(B11)). Не могу понять почему оно не считает его как дату и потом не ищет в списке. Если заменить просто на дату то работает. Но мне нужно только через формулу. Заранее спасибо!
Изменен: 01.08.2022
Читать сообщение на форуме или сайте.
Формула ЕСЛИ с множеством условий, формула ЕСЛИ, расписала условия по сменным графикам в зависимости от времени явки/ухода, но формула не срабатывает.
Автор: Ирина Медведева. Здравствуйте. Помогите, пожалуйста, с формулой ЕСЛИ, расписала условия по сменным графикам в зависимости от времени явки/ухода, но формула не срабатывает. не могу найти ошибку. Ломаю голову неделю уже как =ЕСЛИ(D95=$D$6;$G$6; ЕСЛИ(0<D95>=$D$4;$G$4; ЕСЛИ(6,8<D95>=$D$7;$G$7; ЕСЛИ(12<D95>=$D$8;$G$8;  ЕСЛИ(18<D95<=$D$5;$G$5 “”))))) Строчки где формула не сработала выделила желтым, и есть диапазон времени который должен выдавать ошибку или ложь ( ...
Теги: ЕСЛИ
Изменен: 17.07.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
Читать сообщение на форуме или сайте.
Приведение времени внутри суток к 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
Читать сообщение на форуме или сайте.
МАКРОС ВОРД, Добрый день! Помогите пожалуйста, написать макрос с такой целью: Макрос ищет слова имеющие определенную букву и выделяет найденные слова красный цветом. Обязательно должен выделить все слово,имеющие букву "и", именно слова должен выделить, а не букву и.
Автор: Сырым Жанжигитов. Добрый день! Помогите пожалуйста, написать макрос с такой целью: Макрос ищет слова имеющие определенную букву и выделяет найденные слова красный цветом.Например, имеющие букву "и". Обязательно должен выделить все слово,имеющие букву "и", именно слова должен выделить, а не букву и. 
Теги: Макрос
Изменен: 16.03.2022
Читать сообщение на форуме или сайте.
Автоматическое заполнение Заказника, Необходимо автоматизировать заказ на основании остатков и количественного стандарта
Автор: Сабит Алдонгров. Добрый день! Хочу автоматизировать таблицу для работы с заказами. Есть несколько магазинов, есть остатки в данных магазинах, есть остатки на складе. Необходимо добавлять к заказу по одной позиции вплоть до Того момента пока заказ не будет соответствовать необходимому количеству. Помогите пожалуйста в решении данного вопроса!
Теги: Макрос
Изменен: 01.03.2022
Читать сообщение на форуме или сайте.
Загрузка данных из таблицы excel в таблицу excel (макрос?), защита ячеек
Автор: tango_nefer. Добрый день! Задача: Есть файлы по 5 пользователям, в одном файле: карточка, акты и несколько отчетов из этих актов. Нужно: 1.       закрыть у ячеек, в которых есть формулы возможность корректировки 2.       создать отчеты (такого же формата) в которые будет «сливаться» информация из пяти. Количество строк в карточке динамично и в течение года будет прирастать, поэтому нет возможности жестко закрепить в сводном отчете кто идет за кем. Нужен макрос? Который будет ...
Изменен: 20.02.2022
Читать сообщение на форуме или сайте.
При переходе в следующую строку ссылка должна оставаться на том же месте
... Откупщикова. Здравствуйте! Мне необходимо написать макрос для статистической обработки данных.  При ... фиксированный адрес этой ячейки, но если этого не сделать при второй ... ошибку 1004 и прекращает выполнение макроса. В чем может быть ошибка ... очевидного. Первоначальный циклSub Цикл3() ' ' Цикл3 Макрос ' ' Сочетание клавиш: Ctrl+с ' Начало ... SubИзмененный цикл Sub Цикл3() ' ' Цикл3 Макрос ' ' Сочетание клавиш: Ctrl+с ' Начало ...
Теги: Макрос
Изменен: 07.02.2022
Читать сообщение на форуме или сайте.
Страницы: 1 2 3 4 5 След.
Наверх