Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » diman27
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Формула в DAX., Возможно ли?
 
#
26.03.2024 05:12:58
Добрый день. Подскажите, возможно ли формулу из ячейки "уникальные простои" перенести в DAX?
В данный момент загрузка в power_bi идет с excel, но в дальнейшем будет с sql базы. В excel все понятно, но power_bi работает со столбцами и как сформировать данный запрос я не знаю, да и возможно ли?
Код
=ЕСЛИ(ИЛИ(E3="Неисправность системы АСД";C3="Плановые";(И(E3=E2;(A3-B2)*24*60<10)));0;1)
 
Перейти    
Странный формат даты и время, Как преобразовать обратоно из power query?
 
#
22.02.2024 11:30:11
Всем привет. Есть исходный файл, скачиваемый из одной программы и загружаемый в другую. Данный файл необходимо обработать, я это делаю в power query, и надо загрузить в другую программу. После обработки, дата и время становится датой и временем и, соответственно, загрузчик файл не принимает. Как мне вернуть формат назад? два нуля в часах и общий формат
 
Перейти    
power query замена значений, согласно справочника
 
#
16.02.2024 06:04:39
Добрый день Прошу помощи. Подскажите как реализовать замену текста в столбце Е на данные из справочника? Нужна именно замена в этом же столбце. Знаю что в excel можно сделать, но надо в power query. Структура исходного файла поменяться не должна. Формат даты там кривоватый, таким он и должен остаться. Помогите советом или ссылкой на статью, хочу разобраться.
 
Перейти    
Карта рабочего времени, Построение
 
#
19.04.2023 10:21:53
Привет всем. Ребята, помогите постороить линейный график рабочего времени, как на картинке. Вроде все просто, но из встроенных графиков ничего выбрать не получилось
Изменено: diman27 - 19.04.2023 10:28:44
 
Перейти    
Объединение значений по условию ( количество рейсов на расстояние).
 
#
25.01.2023 06:34:58
Всем привет. Есть большой документ, в примере только малая часть, в котором имеются данные о количестве рейсов самосвалов на расстояние. Необходимо провести объединение одинакового количества рейсов в одну строку.
Ни как не могу придумать как это сделать.
Спасибо.
 
Перейти    
Разделение сдвоенных ячеек с копированием текста в каждую.
 
#
04.02.2022 11:26:41
Привет всем. Подскажите как в excel сделать разделение ячеек, но что бы текст в обеих ячеках остался?
 
Перейти    
Картинки добавлены через формулу IMAGE, но в макросах такого нет
 
#
29.07.2021 17:12:50
Привет всем. Есть большой фал, в нем картинки добавлены через формулу IMAGE, но в макросах его нет. Может делал кто подобное, подскажите как картинки загрузить.
Изменено: vikttur - 29.07.2021 18:54:34
 
Перейти    
Макрос для отправки по почте не отправляет письма по списку получателей
 
#
12.04.2021 11:12:15
Привет всем. Помогите решить проблему с макросом отправки по почте. Пока был 1 получатель все работало, как стало 20 файл отправляется только первому в списке, остальным нет. Подскажите как исправить этот досадный баг
Спасибо.
Код
Sub save_in_pdf_and_send_email()
pdf_file = ThisWorkbook.Path & "" & ThisWorkbook.Name & ".pdf" 'файл ПДФ
ThisWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdf_file, _
    Quality:=xlQualityStandard, _
    IncludeDocProperties:=False, IgnorePrintAreas:=False, OpenAfterPublish:=False
 
Dim objOutlookApp As Object, objMail As Object
Dim sTo As String, sSubject As String, sBody As String, sAttachment As String
 
On Error Resume Next
Set objOutlookApp = GetObject(, "Outlook.Application")
Err.Clear 'Outlook закрыт, очищаем ошибку
If objOutlookApp Is Nothing Then
Set objOutlookApp = CreateObject("Outlook.Application")
End If
objOutlookApp.Session.Logon
Set objMail = objOutlookApp.CreateItem(0) 'создаем новое сообщение 'если не получилось создать приложение или экземпляр сообщения - выходим
If Err.Number <> 0 Then
    Set objOutlookApp = Nothing: Set objMail = Nothing
    MsgBox "Не удалось создать новое сообщение"
    Exit Sub
End If
 
sTo = InputBox("Введите получателей (если несколько то через ;)") '
sSubject = "Тема письма"
sBody = "Тело письма"
sAttachment = pdf_file
With objMail
    .To = sTo
    .CC = ""
    .BCC = ""
    .Subject = sSubject
    .Body = sBody
    .Attachments.Add sAttachment
    .Save
    .Send
End With
Set objOutlookApp = Nothing: Set objMail = Nothing
End Sub
 
Перейти    
Макрос для сохранения в pdf и отправки по почте
 
#
02.04.2021 13:34:18
Привет всем, есть макрос по сохранению в pdf и отправке книги по почте, подскажите как сделать сохранение в pdf и отправку по почте определенного листа, или листов?
Код
Sub save_in_pdf_and_send_email()
pdf_file = ThisWorkbook.Path & "" & ThisWorkbook.Name & ".pdf"      'файл ПДФ
ThisWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdf_file, _
    Quality:=xlQualityStandard, _
    IncludeDocProperties:=False, IgnorePrintAreas:=False, OpenAfterPublish:=False
 
Dim objOutlookApp As Object, objMail As Object
Dim sTo As String, sSubject As String, sBody As String, sAttachment As String
 
On Error Resume Next
Set objOutlookApp = GetObject(, "Outlook.Application")
Err.Clear 'Outlook закрыт, очищаем ошибку
If objOutlookApp Is Nothing Then
Set objOutlookApp = CreateObject("Outlook.Application")
End If
objOutlookApp.Session.Logon
Set objMail = objOutlookApp.CreateItem(0) 'создаем новое сообщение 'если не получилось создать приложение или экземпляр сообщения - выходим
If Err.Number <> 0 Then
    Set objOutlookApp = Nothing: Set objMail = Nothing
    MsgBox "Не удалось создать новое сообщение"
    Exit Sub
End If
 
sTo = InputBox("Введите получателей (если несколько то через ;)") '
sSubject = "Тема письма"
sBody = "Тело письма"
sAttachment = pdf_file
With objMail
    .To = sTo
    .CC = ""
    .BCC = ""
    .Subject = sSubject
    .Body = sBody
    .Attachments.Add sAttachment
    .Save
    .Send
End With
Set objOutlookApp = Nothing: Set objMail = Nothing
End Sub
 
Перейти    
Извлечь текстовое значение первой отфильтрованной строки
 
#
18.03.2021 09:49:35
Привет всем. Использую функцию "агрегат", =АГРЕГАТ(9;5;P2:P730) - (копирование видимой ячейки в другую) с числами работает отлично, но вот текст не переносит. Есть ли возможность реализовать такое же для текста?
Спасибо.
 
Перейти    
Среднее значение видимого диапазона без учета нулей.
 
#
26.02.2021 11:17:01
Привет всем. Подскажите как посчитать среднее значение в видимом диапазоне умной таблицы, без учета нулевых значений.
Подсчет суммы сделал по формуле:
=СУММПРОИЗВ((($C$2:$C$730)=[@Оператор])*ПРОМЕЖУТОЧНЫЕ.ИТОГИ(9;СМЕЩ(D$2;СТРОКА($D$2:$D$730)-СТРОКА($D$2))))
, сумма считается, а вот со средним ни как не совладаю.
Спасибо.
Изменено: diman27 - 26.02.2021 11:17:41
 
Перейти    
Макрос для добавления значения ячейки в название книги при сохранении
 
#
01.12.2020 16:43:19
Привет всем. Помогите доработать макрос с целью добавления значения ячейки в название, дата ячейка ситовый "1.12.20 1см Ситовый", а сейчас Ситовый 1.12.20
Спасибо.
Изменено: diman27 - 01.12.2020 18:37:06
 
Перейти    
Сохранение книг по разным директориям
 
#
01.12.2020 13:38:28
Привет всем. Помогите макрос допилить. Суть в том, что необходимо сохранять файл в разные места и добавлять в имя файла содержимое ячейки D1, то есть: "1.12.20 1см Ситовый", и сохраняет почему то только по одному пути, по второму strPath = "X:\ОТК\СФА" , если меняю их местами, то  так же по одному, но все равно по второму.
Спасибо.
 
Перейти    
Копирование значения по условиям
 
#
09.11.2020 11:21:32
Привет всем. Подскажите как решить мою проблему с копированием данных из лист 2 по дате и по плотности
Например: G2 лист 1 = значению (E4:N11) то копируем значение под нужным значением, в данном примере G2лист1= H6 лист 2, то значение H7 лист 2 копируем в H2 лист1
И так далее по датам.
Изменено: diman27 - 09.11.2020 11:23:43
 
Перейти    
[ Закрыто] Макрос не работает, Помогите починить
 
#
11.09.2020 19:24:34
Привет всем. При нажатии "admin update" выпадает ошибка, не могу понять в чем проблема. Подскажите как починить. Очень надо!
Файл 400Кб
https://drive.google.com/file/d/1ckjCN1JxYWpxzGCpWdtW-9-1nBuFEADc/view?usp=sharing
 
Перейти    
Копировать данные по сети, в другую книгу, с несовпадающей структурой ячеек
 
#
11.09.2020 09:19:40
Привет всем. Подскажите, возможно ли выборочно?  Делать это надо как только в одной (главной) появились данные
 
Перейти    
Название листов автоматом по месяцу и дате.
 
#
11.02.2017 11:18:30
Привет всем. Подскажите как сделать что-бы названия листов менялось в зависимости от месяца открытия листа. Например: открыли книгу в феврале и названия листов стали 1фев(1см) 1фев(2см) 2фев(1см) 2фев(2см) и т.д., а открыли в марте, соответственно 1март(1см) 1март(2см) и т.д.
Спасибо.
Изменено: diman27 - 11.02.2017 11:22:43
 
Перейти    
Построение диаграммы "План-Факт" из данных одной ячейки.
 
#
22.06.2015 18:50:15
Привет всем. Руководство поставило задачу сделать такой график из данных одной ячейки. В ячейку данные для расчета поступают из вне и с другого листа, из них надо вычислять среднее за сутки, в 7 утра каждого дня из этих данных строить график за месяц, то-есть график должен "вырастать" на один день. Офис 2003. Это вообще возможно на его базе?  
Изменено: diman27 - 22.06.2015 19:38:33
 
Перейти    
Разнести данные по столбцам.
 
#
22.03.2015 18:33:10
Привет всем. Подскажите как автоматически разнести данные по столбцам.
Спасибо.
 
Перейти    
Всплывающее окно с кнопками.
 
#
04.03.2015 07:53:28
Привет всем. Есть Excel документ в который в разное время вносят изменения разные операторы, после изменений они нажимают кнопку "запись", запускается макрос и производятся дальнейшие вычисления, но есть здесь проблема в виде человеческого фактора, торопятся, тупят и бывает не то внесут, или не полностью данные забьют. Хотелось бы сделать так что-бы по нажатию "запись" появлялось окно с текстом, что-то типа " уверен?" и кнопки "да" "нет". "Да" запускаем макрос, "нет" зарываем окно и ничего не делаем.
Спасибо.
 
Перейти    
Как сделать постоянное окно поиска?
 
#
16.10.2014 06:49:20
Привет всем. Давно читаю форум и нашел много полезного и нужного, но вот сейчас не смог найти. Как сделать постоянное окно, или строку, поиска? Приходится много искать, может есть возможность сделать так что бы окно поиска появлялось, например в правой стороне экрана, при открытии файла содержащем в названии определенное слово, например "прайс"? Сделать силами макроса это я могу, но он и будет привязан к документу, может есть возможность как это автоматизировать?
Спасибо.
 
Перейти    
Страницы: 1
Наверх