Коллеги помогите пожалуйста доработать фичу. Дано: субъекты РФ, каждый - отдельная форма на вкладке. Как покрасить в зависимости от значения ячейки? Еще пытался еще список объектов вывести (отсюда) но толком не получилось.
чтоб дело мастера боялось, он знает много страшных слов.
Дорогие форумлы-мейкеры, еще одна головоломка, обращаюсь к колективному разуму: Итак есть диапазон (Столбец К) в котором если 0 - номер нужно не учитывать, если 1 - учитывать. В столбце М нужно сформировать минимальное число до ближайшего нуля, а в столбце N - максимальное. Желаемый результат в ручную внесен в примере, показал стрелками.
Красным отмечено правильно, но жедательно чтобы формула повторы не учитывала, это вообще космос.
чтоб дело мастера боялось, он знает много страшных слов.
Дорогие форумчане, прошу помощи в нетепичной задаче.
Дано: несколько десятков файлов - выгрузок из клиент-банка, это вордовские файлы и внутри каждого несколько сотен платежных поручений. Можно ли макросом собрать номера и даты платежных поручений?
Например (сорри что картинкой, в качестве примера нечего выкладывать): Вот из этой страницы поручения мне нужно в эксель построчно выгрузить: 1. Номер платежного поручения - 915 2. Дату ПП - 07.05.2019 3. Страницу на которой это ПП размещено - 79
Возможно ли такое?
чтоб дело мастера боялось, он знает много страшных слов.
Уважаемые профи, помогите пожалуйста сделать макрос, который будет собирать со всех вкладок данные (все таблицы размещены в одной логике - 20 строка, 5-8 столбцы) на вкладку INDATA. Все проиллюстрировано в примере. Справочно: вкладок несколько десятков и данных на них от 1 строки и до нескольких сотен, до итоговой строки (которую желательно не переносить, но если сложно то можно и ее перенести, в ручную удалю)
Спасибо!!!
UPD. И уж было бы совсем супер если бы название вкладки копировалось и дублировалось в любой свободный столбец (1-2) из соответствующих копируемых вкладок.
Уважаемые коллеги! В продолжение ранее заданного вопроса хочу переспросить (вопрос другой, поэтому в новой теме): нужен макрос, раскидывающий значения по конкретным адресам (лист, столбец, строка). В примере все понятно.
Спасибо!!!
чтоб дело мастера боялось, он знает много страшных слов.
Появилась нетривиальная задача, но сам не решил, прошу помочь. Нужно разнести из листа со сценариями значения по другим листам в зависимости от нескольких условий - дата, флаг сценария и наименование листа. Думаю все станет понятно из примера.
Спасибо!
P.S. Изначально задача была решена через формулы, но поскольку строк в каждом листе несколько тысяч книга стала сильно тормозить, почему и потребовалось макросовое решение.
чтоб дело мастера боялось, он знает много страшных слов.
Может быть пора разделить ветки форума на: Вопросы по Excel Вопросы по PQ Вопросы по VBA Вопросы по P-BI
Понятно что по началу все будут по привычке в одну писать, но со временем все спокойно разнесется. Профит - легче искать нужное, легче помогать нужным.
чтоб дело мастера боялось, он знает много страшных слов.
Пожалуйста помогите сберечь время (хоть его и больше стало за последний месяцок))) Нужно собрать однотипные файлы, т.е. скопировать их в один файл. Они все одинаковые по структуре. Пример одного из них прикладываю. Буду очень признателен за текст макроса который избавит меня от последовательности: открыть-скопировать-вставить-закрыть (ибо больше 500 раз) Заранее сердечно благодарен!!!
чтоб дело мастера боялось, он знает много страшных слов.
Прекрасные девочки из отдела кадров попросили помочь с решением вполне себе типовой задачи - составить график отпусков, причем таким образом чтобы видеть пересечения отпусков взаимозаменяемых сотрудников. Например в приложенном файле Пупкин не должен гулять одновременно с Зубкиным, Лошадкин с Собакиным, ну и соответственно Кошкин с Мышкиным. В основе предполагаемого решения СУММПРОИЗВ, но кажется что-то пошло не так.
Буду очень признателен за помощь - думаю многим девочкам из отделов кадров будет такое в помощь. Кстати там еще через условное форматирование показывает количество дней в каждом гуляемом месяце - очень понравилось.
Спасибо!
чтоб дело мастера боялось, он знает много страшных слов.
Имеем такой примитивный Гант в котором шапка динамична. Задача состоит в том чтобы подсвечивать даты шапки месяц назад и три месяца вперед.
Например: мы перевернули календарь и там снова третье сентября. Это значит нам нужно август в шапке подсветить зеленым (факт), а сентябрь, октябрь и ноябрь - например синим - это будет прогноз. Эта логика верна в течение всего сентября. Далее после 1 октября все сдвигается на месяц вперед - сентябрь становится фактом (зеленый), а октябрь, ноябрь и декабрь - становятся синими - план/прогноз. Пожалуйста не надо шуток про необходимость покупки Project - ежики плакали кололись но продолжали есть кактус, имеем что имеем. Буду оч признателен за решение. Ручная подсветка во вложении.
Не знаю как корректно сформулировать запрос, все в примере. Т.е. нужно заполнять лист "На печать" в зависимости от выбранного наименования, подтягивая все из листа "Исходные". Будет просто замечательно если получится обойтись формулами, впрочем наличие макросов не пугает.
Заранее благодарю.
чтоб дело мастера боялось, он знает много страшных слов.
Помогите реализовать задуманное: столбец со светофором меняет цвет (ярлык или заливка ячейки) в зависимости от значения соседней ячейки. Очень желательно чтобы это было без макросов. Исчерпывающий вопрос во вложении.
Спасибо!
чтоб дело мастера боялось, он знает много страшных слов.
Знаю, коллеги, знаю, что миллион подобных тем. И вот из них и составлен код, который немного хочу подправить:
Код
Option Explicit
Private Sub Publish(ByVal FileName As String)
Dim pBook As Workbook, pSheet As Worksheet
Set pBook = Workbooks.Add(xlWBATWorksheet)
Set pSheet = pBook.Worksheets(1)
pSheet.Paste pSheet.Range("A1"), False
'psheet.Pictures.
With pSheet.PageSetup
.PaperSize = xlPaperA4
.Orientation = xlPortrait
.PrintHeadings = False
.PrintGridlines = False
.PrintComments = xlPrintNoComments
.PrintQuality = 600
.LeftMargin = Application.InchesToPoints(0.393700787401575)
.RightMargin = Application.InchesToPoints(0.393700787401575)
.TopMargin = Application.InchesToPoints(0.393700787401575)
.BottomMargin = Application.InchesToPoints(0.393700787401575)
.HeaderMargin = Application.InchesToPoints(0.196850393700787)
.FooterMargin = Application.InchesToPoints(0.196850393700787)
End With
pSheet.ExportAsFixedFormat xlTypePDF, FileName, xlQualityStandard, False, False, OpenAfterPublish:=True
pBook.Close False
End Sub
Public Sub ToPdfAsRaster()
Dim firstRow As Long, lastRow As Long
Dim firstCol As Long, lastCol As Long
Dim pShape As Shape, pSheet As Worksheet
Dim thisRange As Range, pdfName As String
If TypeOf ActiveWorkbook.ActiveSheet Is Worksheet Then
Set pSheet = ActiveWorkbook.ActiveSheet
pdfName = Application.GetSaveAsFilename(pSheet.Name, "Acrobat PDF (*.pdf),*.pdf")
If (UCase$(pdfName) = "FALSE") Or (UCase$(pdfName) = "ËÎÆÜ") Then Exit Sub
ActiveWindow.DisplayGridlines = False
Set thisRange = pSheet.UsedRange
firstRow = thisRange.Row: lastRow = thisRange.Row + thisRange.Rows.Count - 1
firstCol = thisRange.Column: lastCol = thisRange.Column + thisRange.Columns.Count - 1
For Each pShape In pSheet.Shapes
If pShape.TopLeftCell.Row < firstRow Then firstRow = pShape.TopLeftCell.Row
If pShape.TopLeftCell.Column < firstCol Then firstCol = pShape.TopLeftCell.Column
If pShape.BottomRightCell.Row > lastRow Then lastRow = pShape.BottomRightCell.Row
If pShape.BottomRightCell.Column > lastCol Then lastCol = pShape.BottomRightCell.Column
Next
pSheet.Range(pSheet.Cells(firstRow, firstCol), pSheet.Cells(lastRow, lastCol)).CopyPicture xlScreen, xlBitmap
Publish pdfName
End If
End Sub
Необходимо чтобы: 1. Текущий лист сохранялся в pdf 2. После сохранения открывалась папка, в которой был сохранен pdf 3. (добавил) Буду сверщасилив если еще перед сохранением будет проверять - заполнены ли ячейки C2 и C5
Представленный код содержит излишний функционал, но боюсь самостоятельно справиться с очисткой я не сумел.
Прошу помочь решить задачу. Нужно сформировать заказ построчно, через выбор непустых значений. (Объяснять эксель конечно та еще затея...)
Короче говоря желаемое отражено в примере. Т.е. пользователь вводит количество килограмм в прайсе, и далее (кнопка макросом или формулами) в листе заказа соответствующие позиции сразу появляются в списке.
P.S. Если живете в центральной России могу в преддверие НГ корзинку печенья отправить за решение )))
чтоб дело мастера боялось, он знает много страшных слов.
Уважаемые профессионалы! Пожалуйста помогите решить задачу - есть таблица - каталог финтех-проектов в мире за несколько лет. Каждый проект имеет несколько признаков (категорий), при этом каждая категория может быть или b2b или b2c. Задача состоит в том, чтобы в желтый столбец отобразить какойлибо признак, в соответствии с тем, относится ли одна из категорий проекта к b2b. Часть таблицы во вложении.
чтоб дело мастера боялось, он знает много страшных слов.
Коллеги, пожалуйста помогите сделать полезное действие: требуется разделить значения ячейки но отдельные составляющие, задачу упрощает то, что все они отделены запятой.
Желаемое из зеленого в желтное приложено в примере.
Заранее сердечно благодарю!
P.S. Пардон, использовал стандартное "Разделить по столбцам" и полностью закрыл свой вопрос. Не актуально.
Коллеги, помогите решить задачку: в приложенном файле в желтую область нужно собрать три случайных значения из каждой строки, при этом они не должны быть между собой повторяющиеся и не равны значению 1.
Сам попробовал поколхозить с индексом и случмежду,
UPD: В приложенном файле пример противоречивый - например в строке 18 всего два уникальных значения. Понимаю это, но это фрагмент большой таблицы где в строке из которой должна быть выемка данных будет как минимум 4 уникальных значения.
Помогите пожалуйста разобраться с условным форматированием. Нужно чтобы при пересечении участия фамилий в одну дату они подсвечивались. Сейчас заливка - ручная в качестве примера. Мои потуги в формуле условного форматирования внесены.
Файл см. ниже
чтоб дело мастера боялось, он знает много страшных слов.
Коллеги, битый час бьюсь над созданием простой как мне казалось диаграммы. Как сделать диаграмму с кругликом, внутри которого долька распадется еще на определённые составляющие. См. во вложении
чтоб дело мастера боялось, он знает много страшных слов.
Подсмотрел у Николая очень полезные фишки по защите очень важной книги (фишка 1 и фишка 2) Оказалось очень востребовано отображение всех изменений в ячейках, однако писать их в примечаниях оказалось очень неудобно - они стали очень большие, кроме того, примечания постоянно затираются. Отсюда родилось предложение - большая просьба, к профессионалам макросов допилить предложение Николая:
Код
Private Sub Worksheet_Change(ByVal Target As Range)
Dim NewCellValue$, OldComment$
Dim cell As Range
If Intersect(Target, Range("B6:E70")) Is Nothing Then Exit Sub
For Each cell In Intersect(Target, Range("B6:E70"))
If IsEmpty(cell) Then
NewCellValue = "Ячейка очищена"
Else
NewCellValue = cell.Formula
End If
On Error Resume Next
With cell
OldComment = .Comment.Text & Chr(10)
.Comment.Delete
.AddComment
.Comment.Text Text:=OldComment & Application.UserName & " " & _
Format(Now, "MM.DD.YY h:MM:ss") & " : " & NewCellValue
.Comment.Shape.TextFrame.AutoSize = True
.Comment.Shape.TextFrame.Characters.Font.Size = 8
End With
Next cell
End Sub
А именно, нужно чтобы ФИО изменяющего ячейки, дату и время изменения а также то что было изменено собиралось в скрытом листе, вообще без использования примечаний.
Спасибо, очень рассчитываю на Вашу помощь, коллеги!
чтоб дело мастера боялось, он знает много страшных слов.
Помогите пожалуйста собрать разобранное. Есть следующее: есть группа показателей, на достижение которых направлено несколько мероприятий. В закладке Мероприятия - каждому мероприятию соответствует показатель, причем одно мероприятие может быть направлено на достижение нескольких показателей. Как теперь собрать таблицу обратно, т.е. найти все мероприятия на показатель.
Как мне кажется вопрос решается формулой массива и наверное ПОИСКПОЗ, но мои многочисленные потуги успехом не увенчались...
P.S. Вот прям тот случай когда как бы не описывал задачу без примере хрен разберешься.
Пожалуйста подскажите способ реализации под следующую задачу. Есть столбец где указаны наименования показателей и в конце значения ячейки через запятую указаны единицы измерения. Нужно вытащить единицы измерения в отдельный столбец. Я попытался сделать через ПОИСК запятой, но к сожалению в большинстве показателей их несколько:
Например показатель: Доля заявок, поданных через личный кабинет (с использованием ЭЦП или без нее), включая заявки, поданные через МФЦ, %
Искомое значение - это %
Не могу сообразить как заставить искать справа первую запятую и вытащить все что справа от найденной запятой будет.
Спасибо!!
чтоб дело мастера боялось, он знает много страшных слов.
Озадачился решением одной задачи с необходимостью простейшего анализа "что-если" и понял что совсем не знаю как пользоваться этой чудной вещью. Подскажите пожалуйста действительно полезные и проверенные ресурсы по данному инструменты.
P.S. В гугле не забанили, но поиск много чего выдает - спрашиваю может кто-то действительно что-то проверенное и полезное посоветует. Спасибо!
чтоб дело мастера боялось, он знает много страшных слов.
Коллеги, зачастую с таким сталкиваюсь, приходится решать "колхозно". Может есть более элегантное решение - как например сейчас на многих сайтах сделано.
Например есть столбец - "Исполнители". Там выпадающий список с фамилиями людей. Соответственно можем выбрать только одного. А если их например 2 или 3? Можно ли сделать в одной ячейки наполнение из одного выпадающего списка? Используя знак ; как разделить или иной?
чтоб дело мастера боялось, он знает много страшных слов.
Коллеги, пжлст помогите или натолкните на правильную ссылку, уж больно много чего поиск дает - больше запутывает чем помогает. Кроме того, прям не верится что такая простая задача решается через макросы или трехэтажные формулы, уверен прямо под носом лежит простой и элегантный инструмент. Вот его и ищу
Собственно задача тривиальна - подсчитать количество фникальный участников. Считаем его первый раз, если он выше в списке был - пропускаем. Вроде просто, а битый час туда сюда формулы в пустую гоняю...
Очень спасибо заранее!
чтоб дело мастера боялось, он знает много страшных слов.
Прошу помочь разобраться с вопросом организации рассылки с вложением. Т.е. нужна адресная именная рассылка (вот эти -ый и -ая) как здесь http://www.planetaexcel.ru/techniques/13/161/ Однако там нет возможности сделать рассылку с вложением (вставка вложения как объект в текст не помогла). Плекс (http://www.planetaexcel.ru/plex/plex-features.php#mail) тоже не помог, ибо в его настройках уже не сделать именную рассылку.
Собственно как сделать рассылку (более 700 контактов), при этом к каждому обратиться персонально УважаемыйИван Васильевич! И при этом в электронном письме сделать вложение?
P.S. Рассылка не спам а помощь коллегам.
чтоб дело мастера боялось, он знает много страшных слов.