Поиск
Автор: Vassily Vasiliev. Доброго дня!
Имеется лист 1, лист 2 и лист с результатом в файле Excel.
Лист 1 на примере в ячейках O2 и O3 имеет зашифрованные значения, которые должны быть заменены на значения расположенные на листе 2 на примере в ячейках B2 и B3.
Для визуального понимания направляю ссылку на скриншот: https://ibb.co/2yz2SnZ .
На Листе 1 и Листе 2 имеются одинаковые по содержанию столбцы с данными по которым может производиться индексация и выборка необходимого значения для ...
Изменен: 19.04.2024
Читать сообщение на форуме или сайте.Автор: LonyPay. Не получается решить задачу:
Необходимо с помощью массива перенести данные:
Из таблицы "приход-расход" (вложение №1), по условию:
если в столбце №16 Акт ввода в эксплуатацию >0,
то необходимо наименование переносить на другой лист "Ввод в эксплуатацию", (возможны повторяющиеся значения и количество столбцов и строк также могут меняться), написал формулу массива, но она не работает и не могу понять, где ошибка,
Изменен: 08.04.2024
Читать сообщение на форуме или сайте.Автор: HUGO_ST. Добрый день!
Прошу подсказать решение:
Есть сводная таблица (файл во вложении), в которой добавлен вычисляемый столбец Маржа, руб. %. = 'Маржа, руб'/'Оборот, руб' (или доля маржи от оборота).
Как в сводную таблицу справа добавить вычисляемый столбец, в котором вычислить отклонение каждого значения в столбце Маржа, руб. %. от среднего по столбцу Маржа, руб. %, т.е. по нему же. Ожидаемый результат разместил в столбе Отклонение от среднего, рассчитав ...
Изменен: 31.03.2024
Читать сообщение на форуме или сайте.Автор: NV.Telegin. Добрый день
Подскажите, пожалуйста, может кто сталкивался, как исправить ошибку в power query? Суть следующая:
1. В редакторе запросов делаю объединение, и после маппинга забираю нужный мне столбец (в 1 из 5 листов это работает), в редакторе он отображается, но после сохранения и закрытия, в таблицу ничего не попадает, она просто пустая (рисунок Screen 1 во вложении)
2. После обновления источников данных, даже в редакторе пропадает значение (Screen 2 во вложении), но когда я в ...
Изменен: 16.02.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
Читать сообщение на форуме или сайте.Автор: a.zaini. Здравствуйте! не могли бы помочь с макросом для ексель пожалуйстаа. Нужно чтоб две таблицы с 2 одинаковыми столбцами синхронизировались, чтоб при изменении данных в одной из таблиц сразу менялись эти данные во второй таблице, и обратно при изменении данных во второй таблице менялись в первой таблице. И чтоб фильтровались по значению среза. В прикрепленных файлах загрузила эксель файл, в котором нужно проводить эти операции. 1 таблица находится на 1Листе, срез и 2 Таблица ...
Изменен: 03.11.2023
Читать сообщение на форуме или сайте.Автор: Lastdony. Как можно суммировать по условию, чтобы в первом столбце был поиск по нужному значению и когда значение найдено к примеру
"отказы лишние" дальше все значения по горизонтали какие есть просуммировались, при этом таблица может расшириться поэтому сумма должна быть по диапазону и значение (к примеру "отказы лишние") так же могут по вертикали перемещаться
Изменен: 01.11.2023
Читать сообщение на форуме или сайте.Автор: lololololol. Задание
При помощи инструмента Границы и использования автофигур создайте примеры перевода из десятичной системы счисления в двоичную. Надо сделать также как на фото в excel, просто формула не подходит
12310=?2
9910=?2
Пример:
Изменен: 29.10.2023
Читать сообщение на форуме или сайте.Автор: TheArhus. Добрый день!
Прошу решить следующую проблему:
Есть файл (во вложении)
Отталкиваясь от столбцов "K" и "O" нужно добавить строки по следующему условию:
Если в столбце "K" ячейки не равны 0 (нулю) и если в столбце "O" ячейки не равны 0 (нулю) то
К каждой такой строке нужно добавить строку сверху.
В этой строке ячейки со "Стоимость руб." нужно зачеркнуть.
Такую добавленную строку нужно форматировать как нижнюю, включая формат данных ...
Изменен: 23.10.2023
Читать сообщение на форуме или сайте.Автор: al.tarin. Здравствуйте!
Есть макрос, который удаляет лист после выполнения пересчета. Но появляется окно с запросом стоит ли удалить лист, ведь там есть данные.
Можно ли обойти это окно, тк нужно чтобы лист удалялся без вмешательства пользователя
Изменен: 25.09.2023
Читать сообщение на форуме или сайте.Автор: al.tarin. Здравствуйте! Необходимо чтобы сработал макрос после того, как произойдут вычисления в книге, но workbook_sheetcalculate не работает, помогите пожалуйста!
Изменен: 21.09.2023
Читать сообщение на форуме или сайте.Автор: allovar. Есть сайт фондовой биржи. На сайте в углу есть кнопка "ТОРГОВАЯ ИНФОРМАЦИЯ", при нажатии на которую вызывается страница с информацией по торгам на бирже. Как можно с помощью Power Query правильно спарсить данную страницу (всплывающую)? Ссылка здесь. У меня при обычном Get From Web по этой ссылке парситься только главная страница, а всплывающая нет. Как быть?
Прикрепил изображение. Во всплывающем окне необходимо зайти во вкладку Результаты торгов за день и парсить ...
Изменен: 12.07.2023
Читать сообщение на форуме или сайте.Автор: magistr_ken. Привет, знатоки.
Нужна ваша помощь, слева то что написано буквами это СКЮ, сверху(2001,2002, и т.д) это код магазина. А то что между ними это продажи.
Мне нужно привести это в вид где все это стоит вертикально.
При этом для каждого СКЮ должны повторяться все коды магазинов,и рядом стоять продажи этого СКЮ в этот магаз.
Пример как должно выглядеть показал.
Изменен: 04.07.2023
Читать сообщение на форуме или сайте.Автор: Crowner. Подскажите чайнику, пожалуйста.
Вот есть у меня макрос следующего вида
Dim objFolder As Outlook.Folder
Dim objNS As Outlook.Namespace
Dim objMail As Outlook.MailItem
Dim lCounter As Long
Set objNS = Outlook.GetNamespace("MAPI")
Set objFolder = objNS.GetDefaultFolder(olFolderInbox).Folders("Важная папка")
For lCounter = 1 To objFolder.Items.Count
Set objMail = objFolder.Items.Item(lCounter)
{Здесь я получаю информацию различную из objMail такие как дата, время, ...
Изменен: 27.06.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" - все значения исправно встают куда им нужно, но не в ту книгу.
Вопрос в следующем, ...
Изменен: 21.03.2023
Читать сообщение на форуме или сайте.Автор: Виталий Донец. В таблице есть столбец со значениями и столбец Критерий, нужно получить разницу между текущим и предыдущим значением, но только выбранных строк с одинаковым критерием. Т.е. не получится текущее-1, нужно: "текущее" - "максимальное число из предыдущих удовлетворяющее критериям". Пример таблицы во вложении.
Должно быть простое решение, но что-то я запутался ))
Изменен: 17.01.2023
Читать сообщение на форуме или сайте.Автор: Виталий Донец. В таблице есть столбец со значениями, которые получены путем сложных вычислений и несколько столбцов, критерии фильтра, нужно отфильтровать и получить разницу между текущим и предыдущим, но с учетом фильтрации по другим столбцам. Т.е. не получится текущее-1, нужно текущее-максимальное число из предыдущих удовлетворяющее критериям это может быть текущее-2, или текущее-12 и т.д. Пример таблицы во вложении.
Должно быть простое решение, но что-то я запутался ))
Изменен: 17.01.2023
Читать сообщение на форуме или сайте.Автор: Александр 1331. Кто может небезвозмездно помочь решить задачу в EXCEL c формулами?
ТЗ в приложении..
Изменен: 12.01.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
Читать сообщение на форуме или сайте.Автор: Galina7138. Здравствуйте! Помогите, пожалуйста, решить проблему. Есть текст в ячейке: ФИО людей через запятую. Нужно разделить их на отдельные строки. Пока решаю текстом по столбцам и потом копировать с транспонированием. Но это довольно долго, а делать так приходится часто. Есть ли макрос на этот случай?
Изменен: 10.10.2022
Читать сообщение на форуме или сайте.Автор: Жан Коштоян. Добрый день!
Прошу помочь с Excel VBA. У меня excel 2010.
На листе "Лист1" в ячейке R7C53 записана формула массива:
{=НАИМЕНЬШИЙ(ЕСЛИ(ДВССЫЛ($AZ$7 )>=$AX$7;ДВССЫЛ($AZ$7));1)}
Она вычисляет минимальное значение из диапазона записанного в R7C52 превышающее расчетное значение в ячейке R7C50.
Алгоритм действий:
1. Вычисляем сечение клапана (Высота*ширину). Записываем в ячейку R7C50;
2. В диапазоне $AW$6:$AW$36 (в макросе записано в стиле R1C1) записаны максимальные ...
Изменен: 31.08.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
Читать сообщение на форуме или сайте.Автор: 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 ...
Изменен: 14.07.2022
Читать сообщение на форуме или сайте.Автор: В. Здравствуйте.
Нужна формула что бы каким то образом посчитать данные в текстовых строках типа "1/2/3" по шаблону типа "А/Б/В".
То-есть цифры находящиеся над соответствующей буквой считаются в одну ячейку, над другой буквой в другую ячейку.
Прикладываю пример, суммы просто введены текстом, нужно заменить его на формулы.
Изменен: 22.06.2022
Читать сообщение на форуме или сайте.