Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 394 След.
Рассчитать скользящее среднее по последним N неделям
 
Цитата
Алена написал:
ругается про циклическую ошибку
Где?
Цитата
Алена написал:
прогноз по неоткрытым
А как же это?
Цитата
2.6. Один вопрос - одна тема. Не следует в открываемой теме обозначать и задавать сразу несколько вопросов.
Рассчитать скользящее среднее по последним N неделям
 
Доброе время суток.
Цитата
Алена написал:
а можно это как то на DAX написать?
Можно.
Код
=Var lastWeek = MAX('Таблица1'[Номер недели в году])
Return AVERAGEX(FILTER('Таблица1'; 'Таблица1'[Номер недели в году] > (lastWeek - 8)); 'Таблица1'[продажи шт])
В PQ запрос долго выполняется и потом появляется ошибка
 
Доброе время суток
Цитата
Ибрагим Белхороев написал:
А нули, что обозначают?
А почитать #duration?
Нарастающий итог в PP (DAX), Нарастающий итог в PP (DAX)
 
Доброе время суток.
Вроде же очевидно
Код
=IF(ISBLANK([Сумма факт]); BLANK(); CALCULATE([Сумма факт];FILTER(ALL('Calendar'[Date]);'Calendar'[Date]<=MAX('Calendar'[Date]))))
Подсчет среднего значения с условием в Power Pivot
 
Цитата
Артем написал:
написать функцию СРЗНАЧЕСЛИМН
То есть вы полагаете, что предложенная вам функция для вычисляемого столбца этому не удовлетворяет? Можно это как то более детально обосновать?
Подсчет среднего значения с условием в Power Pivot
 
Артем, ответ на название темы и постановку задачи в первом посте вами получен.
Цитата
Артем написал:
сравнить с прошлым периодом
на мой взгляд, уже выходит за описанные рамки. Можете создать ещё одну тему или подождать другого участника форума, который считает, что это не так.
P. S.
Цитата
Артем написал:
А как установить несколько фильтров: год/месяц? так же?
Пожалуйста, не стесняйтесь, помогите следующему отвечающему
Цитата
2.3. Приложите файл(ы) с примером (общим весом не более 300Кб) в реальной структуре и форматах данных того, что есть сейчас и того, что хотелось бы на выходе.
Power Query.Скорость внутренних вычислений, Довольно медленно обновляется запрос. Можно ли как то улучшить положение?
 
Цитата
Пытливый написал:
взрыва мозга
А чего там такого? Ну, универсальная функция генерации списков. На VB.NET будет как-то так
Код
Public Delegate Function NonAgrument() As Object
Public Delegate Function SingleArgument(ByVal arg1 As Object) As Object

Module Module1
   'Аналог List.Generate
   Public Function Generate(
         ByVal Initial As NonAgrument,
         ByVal Condition As SingleArgument,
         ByVal NextItem As SingleArgument,
         ByVal Selector As SingleArgument) As ICollection

      Dim curItem As Object = Initial()
      Dim result As New Collection
      Do While DirectCast(Condition(curItem), Boolean)
         result.Add(Selector(curItem))
         curItem = NextItem(curItem)
      Loop
      Return result
   End Function

   Function myInitial() As Object
      Return 5
   End Function

   Function myCondition(ByVal item As Object) As Object
      Return CType(item, Long) < 11
   End Function

   Function myNextItem(ByVal item As Object) As Object
      Return CType(item, Long) + 1
   End Function

   Function mySelector(ByVal item As Object) As Object
      Return item
   End Function
   Sub Main()
      Dim test As Collection = Generate(
         AddressOf myInitial,
         AddressOf myCondition,
         AddressOf myNextItem,
         AddressOf mySelector)
      For Each item As Object In test
         Console.WriteLine(item)
      Next
      Console.ReadKey()
   End Sub
End Module
Подсчет среднего значения с условием в Power Pivot
 
Доброе время суток
Цитата
Артем написал:
посчитать среднее в каждом месяце
Где посчитать? Если речь идёт о вычисляемом столбце, то
Код
=CALCULATE(AVERAGE('Таблица1'[Строк]); ALLEXCEPT('Таблица1'; 'Таблица1'[Дата]))

P. S. Только какой в этом священный смысл?
Power Query не показывает таблицу из сайта
 
Цитата
Ибрагим Белхороев написал:
это через power query?
Да, но версия для Power BI Desktop, а не для Excel. По крайней мере 2016. Что там в 2019 и 365 сейчас не скажу, но месяца два назад подобного не было, хотя в BI это уже года два как есть.
Power Query не показывает таблицу из сайта
 
Цитата
Jack Famous написал:
Это не то?
Привет, Алексей.
Нет, не то. Это то, что потом скрипты после загрузки исходного кода страницы формируют. А вот Power Query читает ровно то, что можно увидеть по ПКМ - исходный код страницы (что там в меню - зависит от браузера).
Цитата
Ибрагим Белхороев написал:
почему Power Query сам не преобразовывает
Об этом, полагаю, могут сообщить только разработчики Power Query. Но они наш форум вряд ли посещают.
Updated.
А вот Power BI вполне себе может тянуть динамическое содержимое
Изменено: Андрей VG - 14.09.2021 14:01:32
Power Query не показывает таблицу из сайта
 
И вам тоже - здравствуйте.
Цитата
Ибрагим Белхороев написал:
не показывает таблицу из сайта
Посмотрите код страницы - попробуйте найти там тэг <table ;)
Power Query - Удаление из столбца текстовых значений в таблице всех элементов, указанных в отдельном списке
 
Доброе время суток.
Цитата
Kirill Gureev написал:
Просидел долго, результат не утешителен.
Кирилл, для начала - решите задачу на алгоритмическом уровне с учётом всех ограничений (и самым главным ограничением - Power Query - функциональный язык программирования), а уж потом переходите к решению в Power Query - собственно поиску пересечения алгоритмического решения с существующими функциями Power Query.
Power query - функции в запросах (теоретическое разъяснение)
 
Доброе вермя суток
Цитата
Kirill Gureev написал:
должен откуда-то происходить вызов
Вызов выполняется в теле функции List.Accumulate
Вариант тела Accumulate на псевдо Basic
Код
Public Function Accumulate(ByVal list As Collection, ByVal seed As Object, ByVal accumulator As Function) As Object
    Dim nextItem As Object, result As Object
    result = Clone(seed)
    For Each nextItem In list
        result = accumulator(result, nextItem)
    Next
    Accumulate = result
End Function
Изменено: Андрей VG - 11.09.2021 08:54:55
PQ разный формат даты
 
Цитата
evgeniygeo написал:
могут быть пустые строчки
Так в чём проблема? Просто удалить null элементы списка для анализа. Или вы код не хотите изучать?!
Код
items = List.Transform(List.RemoveNulls(Table.Column(forTable, dateColumnName)), each listItemToNumber(Text.Split(_, "/")))
PQ разный формат даты
 
Цитата
evgeniygeo написал:
Если хоть одно значение имеет больше 12 в начале, то это RU-столбец, а если все меньше или равны 12 то EN
Крайне наивно. А что если в столбце только одно значение 08/09/2021 - это 8 сентября или 9 августа? Код ниже даст 9 августа :)
Код
let
    listItemToNumber = (items as list) as list => List.Transform(items, Number.From),
    transformDateColumn = (forTable as table, dateColumnName as text) =>
    let
        items = List.Transform(Table.Column(forTable, dateColumnName), each listItemToNumber(Text.Split(_, "/"))),
        defineMax = List.Transform(items, each if _{0} > _{1} then [pos = 0, max = _{0}] else [pos = 1, max = _{1}]),
        max = List.Max(defineMax, null, (a, b) => a[max] - b[max]),
        cultureSign = if max[pos] = 0 then "ru-RU" else "en-US"
    in
        Table.TransformColumnTypes(forTable, {{dateColumnName, Date.Type}}, cultureSign),
    Source = Excel.CurrentWorkbook(){[Name="Таблица2"]}[Content],
    test = transformDateColumn(Source, "В2")
in
    test
PQ разный формат даты
 
Цитата
evgeniygeo написал:
в столбце могут быть либо RU, либо EN,
Как однозначно по содержимому столбца это определить - когда RU, а когда EN? По его названию?
PQ разный формат даты
 
Цитата
evgeniygeo написал:
работает только для EN
Ну, а что вы собственно хотели? Как аукнулось - так и откликнулось. Ну, можно в вашем случае попытаться разбить текст по / и по второму элементу получившегося списка определить, что там есть число большее 12 - тогда там день и формат mm/dd/yyyy.
Но, что если там числа не превышающие 12? Тогда как автоматически определить это формат mm/dd/yyyy или dd/mm/yyyy? Предложите однозначный критерий для такого определения.
PQ разный формат даты
 
Доброе время суток.
Чуть более универсальный вариант
Код
let
    slashContains = (text1, text2) => Text.Contains(text1, text2),
    transformDateColumn = (forTable as table, dateColumnName) =>
    let
        cultureSign = if List.Contains(Table.Column(forTable, dateColumnName), "/", slashContains) then "en-US" else "ru-RU"
    in
        Table.TransformColumnTypes(forTable, {{dateColumnName, Date.Type}}, cultureSign),
    Source = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    test = transformDateColumn(Source, "В1")
in
    test
Макрос замены точки на запятую
 
Добро время суток.
Цитата
Анжелика написал:
замены точки на запятую в столбце Е
Вариант
Код
function zamena() {
  var spreadsheet = SpreadsheetApp.getActive();
  spreadsheet.getRange('E:E').createTextFinder('.').replaceAllWith(',');
};
Порядковое количество уникальных значений в столбце
 
Доброе время суток.
Вариант.
Код
Sub n()
Dim pDict As Object, i As Long
Set pDict = CreateObject("Scripting.Dictionary")
For i = 1 To 10
pDict(Cells(i, 1).Value) = pDict(Cells(i, 1).Value) + 1
Cells(i, 2) = pDict(Cells(i, 1).Value)
Next i
End Sub
VBA. Преобразовать число в текст с учетом формата ячеек.
 
Доброе время суток.
Изучите Range.Text property (Excel)
Форумы по продуктам MS
 
Ещё 5 копеек.
programmersforum - там оба два Игоря в главных :) ,
sql.ru
PQ. Вывести на отдельный лист наибольшее количество совпадений
 
Доброе время суток
Цитата
DJMC написал:
строчки в которых будет наибольшее количество совпадений
Вариант
P. S. Непонятно, почему заявлено 14 или 13, если в примере максимальное 15.
А не пора ли пересмотреть требование к названию темы?
 
БМВ, Михаил, если
Цитата
Неопытный_Экселист написал:
работа горит, ответ нужен срочно
, то имеет ли смысл в
Цитата
БМВ написал:
Примерами снабдить, чтоб понятно было о чем речь.
Оно будет это читать? Я не уверен, что скорогорящие вообще в правила заглядывают, ибо, как написал Неопытный_Экселист,
Цитата
Неопытный_Экселист написал:
Но ЮЗЕРА-ПОТРЕБИТЕЛЯ форума проблема его развития НИКАКИМ БОКОМ НЕ КАСАЕТСЯ... он НЕ ОБЯЗАН ДУМАТЬ
:D
P. S.Неопытный_Экселист, а почто не дописали, что потребитель всегда прав?
А не пора ли пересмотреть требование к названию темы?
 
Цитата
evgeniygeo написал:
Но нельзя ли расширить количество модераторов
Отчего ж нельзя - записывайтесь :)  Можете и Неопытный_Экселист с агитировать.
Обработчики собственных событий пользовательской формы Excel
 
Цитата
RAN написал:
от  пережитков прошлого века?
Ну, да. Событийная модель появилась в Visual Basic 5, в офисе 1997.
Цитата
Денис Родстванепомнящий написал:
а можно ли как-то обработчик своего события вставить в код формы
А зачем? Не проще ли вызвать метод в форме по необходимости? Если уж очень хочется, то переходите на .Net.
Цитата
Денис Родстванепомнящий написал:
может литературу какую-нибудь посоветуете?
Учитывая древность языка - разве что стандартное Джон Уокенбах, Профессиональное программирование на VBA в Excel. По идее, должно быть нечто подобное. Не читал, не скажу.
Обработчики собственных событий пользовательской формы Excel
 
Доброе время суток
Цитата
Денис Родстванепомнящий написал:
Создал класс Class1. В его коде создал переменную. Там же появилось в выпадающем списке событие формы, на которую ссылается переменная. Выбрал. Автоматически создался обработчик события Event1. Добавил в него Debug.Print "Event1"
Осталось выполнить инициализацию f :)
Найти массив, где содержатся нулевые строки
 
Цитата
Ігор Гончаренко написал:
а можешь мне обьяснить в чем задача?
Привет, Игорь.
Я конкретно решал эту задачу
Цитата
DJMC написал:
нужно чтобы было сравнение одной строки с двумя строками
То есть. Дан массив ячеек в столбце. Каждая ячейка содержит текст равный по длине тексту в других ячейках. Необходимо составить сочетания по три ячейки. Далее, сравнить три их текста посимвольно. Если в текущей позиции все три текста содержат один и тот же символ, то считаем это совпадением. Соответственно, нужно посчитать количество таких совпадений.
А что решает ТС вообще, понять не возможно уже почти год. Определений нет, те слова и словосочетания какие он использует, на мой взгляд, никак нельзя сопоставить с тем что есть в исходных данных. Например, если верно предположение, что купон - это текст в ячейке, то как можно из
Цитата
DJMC написал:
берет первый купон из трех ... и сверяет на количество совпадений с оставшимися двумя, и получается всего 6 купонов
процесс получения не описан. Видимо, предполагается прошерстить все посты ТСа и по ним построить некоторое логически связанное содержимое.
Найдётся ли такой желающий... Вопрос риторический.
Найти массив, где содержатся нулевые строки
 
Цитата
DJMC написал:
это сделали
В Power Query. На всякий случай код
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    addRowId = Table.AddIndexColumn(Source, "rowId", 1),
    base1 = Table.RenameColumns(addRowId, {{"Данные", "Данные.1"}, {"rowId", "rowId.1"}}),
    base2 = Table.RenameColumns(addRowId, {{"Данные", "Данные.2"}, {"rowId", "rowId.2"}}),
    base3 = Table.RenameColumns(addRowId, {{"Данные", "Данные.3"}, {"rowId", "rowId.3"}}),
    join = Table.Join(Table.Join(base1, {}, base2, {}), {}, base3, {}),
    needed = Table.SelectRows(join, each [#"rowId.1"] < [#"rowId.2"] and [#"rowId.2"] < [#"rowId.3"]),
    calc = Table.AddColumn(needed, "Количество совпадений", (rec) =>
        List.Count(
            List.Select(
                List.Transform(
                    List.Zip({Text.ToList(rec[#"Данные.1"]), Text.ToList(rec[#"Данные.2"]), Text.ToList(rec[#"Данные.3"])}),
                    each List.Count(List.Distinct(_))
                ),
                each _ = 1
            )
        )
    )
in
    calc

Сразу скажу, что алгоритм построения сочетаний из n по 3 строки, мягко говоря, "детский". Но, боюсь в Power Query построить полноценно генерацию сочетаний в лексикографическом порядке будет весьма не просто, и не факт, что он будет работать быстро.
P. S. Учтите, что =ЧИСЛКОМБ(100;4) = 3 921 225 - не хватит строк на листе для вывода.
Интересно, вы будете глазами анализировать даже =ЧИСЛКОМБ(100;3) = 161 700?
Найти массив, где содержатся нулевые строки
 
Доброе время суток
Цитата
DJMC написал:
было сравнение одной строки с двумя строками
Вариант
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 394 След.
Наверх