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

Страницы: 1 2 След.
Трансформация таблицы с одного вида в другой с помощью Power Query
 
#
06.09.2021 08:16:50
mechanix 85, спасибо. все работает как надо))
 
Перейти    
Трансформация таблицы с одного вида в другой с помощью Power Query
 
#
03.09.2021 16:42:40
Добрый день.
Нужна ваша помощь в трансформации одной таблицы в другую.
Есть таблица БАЗА в которой перечислены запчасти и их наличие у продавцов.
Необходимо транспонировать только часть таблицы с дилерами и числовыми значениями наличия запчастей.
После этого добавить к каждому продавцу колонки A.B.C.D.
Заранее спасибо за помощь.
Пример прикрепляю.
 
Перейти    
Подсчет среднего по критерию из столбца и рядка
 
#
08.04.2021 16:37:49
МатросНаЗебре, а если я хочу перенести две таблицы с формулами на лист 3 мне нужно только поменять критерии и убрать названия листов в формуле ?
 
Перейти    
Подсчет среднего по критерию из столбца и рядка
 
#
08.04.2021 16:24:00
МатросНаЗебре, спасибо. все работает.
понял что мне  надо подтянуть этот раздел ))
 
Перейти    
Подсчет среднего по критерию из столбца и рядка
 
#
08.04.2021 14:59:30
МатросНаЗебре, в таблицу вставил. что то не работает. а вы не моглиб скинуть пример
 
Перейти    
Подсчет среднего по критерию из столбца и рядка
 
#
08.04.2021 14:38:43
Добрый день))
Подскажите, как подсчитать среднее значение после проведения опроса.
Данные опроса на листе 3.
В первой таблице необходимо подсчитать среднее по тому как каждое подразделение оценило другое. (Лист 5)
А во второй таблице посчитать посчитать среднее по критериям по каждому подразделению. Критерий №1 выделен цветом, за ним критерий №2 и.т.д. (Лист 5)
Если клетка пуска не брать ее в расчет
Изменено: Evgenii Kov - 08.04.2021 14:53:49
 
Перейти    
Построчно сверить две таблицы и найти расхождения (VBA или PQ)
 
#
07.04.2021 00:34:33
Тема - Сравнение двух таблиц с множеством столбцов
 
Перейти    
Построчно сверить две таблицы и найти расхождения (VBA или PQ)
 
#
07.04.2021 00:04:09
buchlotnik, ок. давайте попробуем переформатировать задачу. может так будет лучше.
в колонке RP указать что есть разницы. в колонке RQ указать номера столбцов в которых есть разницы.
если строка вообще уникальная поставить статус "уникальная" в колонке RR.
это нужно сделать зеркально в обоих таблицах.
файл прикрепляю. Пришлось засунуть его в архив.
Строк оставил по 50 шт. на самом деле их больше
 
Перейти    
Построчно сверить две таблицы и найти расхождения (VBA или PQ)
 
#
06.04.2021 23:39:00
buchlotnik все равно что то не так. оно показывает все строки.
у меня в Т1 - 535 строк и в Т2 535 строк. во всех не могут быть ошибки. я ради интереса сверил 20 строк из Т1 и Т2. разниц нет
может можно что б оно добавляло колонку в которой был бы индикатор Есть разницы или Нет разниц  
 
Перейти    
Построчно сверить две таблицы и найти расхождения (VBA или PQ)
 
#
06.04.2021 23:08:32
 buchlotnik, вы правы. я не заметил что названия столбцов могут тоже отличаться. но значения в этих столбцах означают одно и тоже.  
я имею в виду что столбцы стоят в одном и том же порядке но у некоторых названия могут не совпадать. хотя значения у них одинаковые
Сорий за неудобства. Столбцов много и сразу тяжело было заметить.  
Изменено: Evgenii Kov - 06.04.2021 23:09:15
 
Перейти    
Построчно сверить две таблицы и найти расхождения (VBA или PQ)
 
#
06.04.2021 22:56:03
buchlotnik, спасибо. но на шаге tr список не формируется.  пишет Expression.Error: Поле "Instrument type" записи не найдено.
Сведения:
и ниже остальные поля
 
Перейти    
Построчно сверить две таблицы и найти расхождения (VBA или PQ)
 
#
06.04.2021 22:13:54
Добрый день уважаемые форумчанЕ ))
Нужна ваша помощь в сверке двух таблиц.
Есть таблица 1 (Т1) она на одном листе, есть таблица 2 (Т2) она на другом листе. Таблицы по названию колонок и их количеству одинаковые. Но в самих колонках (в их содержании) могут быть отличия. Мне надо найти эти отличия. В итоге должны остаться только строки в которых есть разницы. Количество колонок при каждой сверке может быть разным. Может быть 50, а может быть и 200. Сверять просто через = (равно) не удобно. Как это сделать макросом или как вариант через Power Query ?
Пример прикрепляю. Лист Т1 и Т2 это то что дано, на листе "пример результата" схематично описан процесс как все должно быть.
Заранее спасибо за помощь )))
 
Перейти    
Разделение одного файла на несколько
 
#
28.03.2021 19:09:21
долго мучался и получилось.
оставлю это тут. вдруг кому понадобится.
Код
Option Explicit ' Обязательное объявление переменных


Sub Border_Limit()
  Dim Limit As Integer, Count As Integer, SaveDir As String, SetTitle As Boolean
  Dim n1, n2, n3, n4, n5, n6, n7, q
  Dim WB As Workbook
  n1 = Sheets("СТАРТ").Cells(2, 2)
  n2 = Sheets("СТАРТ").Cells(3, 2)
  n3 = Sheets("СТАРТ").Cells(3, 3)
  n6 = Sheets("СТАРТ").Cells(4, 2)
  n7 = Sheets("СТАРТ").Cells(4, 3)
  
  Application.DisplayAlerts = False
  Count = 1:  ' Счётчик файлов;
  SetTitle = True ' Если есть заголовок, заменить False на True
       MsgBox "Выберете файл для разделения"
    MakrosFail
    n5 = Sheets("СТАРТ").Cells(5, 2)

  
     MsgBox "Выберете папку для сохранения разделенных файлов"
    MakrosPapka
    n4 = Sheets("СТАРТ").Cells(6, 2)
          ' Открыть файл
   Set WB = Application.Workbooks.Open(Sheets("СТАРТ").Cells(5, 2))
  
  SaveDir = n4 ' Или вписать полный путь для сохранения "C:\"
  ' Предполагается, что в колонке A нет пустых ячеек
  While Not IsEmpty(Cells(IIf(SetTitle, 2, 1), 1))
  q = WorksheetFunction.RandBetween(n6, n7)
    Rows("1:" & q).Copy
    Workbooks.Add xlWBATWorksheet ' Создать новую книгу: шаблон с 1 листом
    ActiveSheet.Paste: Cells(1, 1).Select
    Columns("A").Delete
    ActiveWorkbook.SaveAs Filename:=n4 & "\" & n2 & "_" & n1 & ".xls", _
        FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False
    ActiveWindow.Close
    Rows(IIf(SetTitle, 2, 1) & ":" & q).Delete Shift:=xlUp
    n2 = n2 + n3
    Count = Count + 1
    
  Wend: MsgBox "Файл разбит на " & Count - 1 & " файл(ов). "
  Application.DisplayAlerts = True
  '    Закрыть файл
        WB.Close False
End Sub
 
Перейти    
Разделение одного файла на несколько
 
#
28.03.2021 14:46:46
Добрый день. Помогите, пожалуйста, создать макрос который будет разделять данные с листа БАЗА файла (пример прикрепляю) на более мелкие с сохранением строки заголовков (строка заголовков должна быть в каждом файле). Делить он должен по указанному количеству строк. Это количество должно быть рандомным в диапазоне от 5 до 20. Все разделенные файлы должны сохраняться в указанную папку в формате .xls Книги  Excel 97-2003
 
Перейти    
Разница между временем в Power Query
 
#
11.02.2021 15:27:48
Антон, спасибо.  
 
Перейти    
Разница между временем в Power Query
 
#
11.02.2021 13:47:55
Андрей VG, спасибо. дальше уже знаю что и как сделать.
Может вы сможете еще помочь. Как из столбца с временем выделить только то время - которое в промежутке с 17.30 до 07.30. Все что от 07.30 до 17.30 мне для работы не нужно.
Я пробовал через фильтр и/или но получается не то что надо.  
 
Перейти    
Разница между временем в Power Query
 
#
11.02.2021 11:08:44
buchlotnik, спасибо. попробую найти ответ там )))
 
Перейти    
Разница между временем в Power Query
 
#
11.02.2021 11:06:29
прикрепляю пример
Изменено: Evgenii Kov - 11.02.2021 11:09:45
 
Перейти    
Разница между временем в Power Query
 
#
11.02.2021 10:22:58
Цитата
StepanWolkoff написал:
А вы вобще смотрели какой результат возвращает эта конструкция [Время]-[Время]{[Индекс]-1}?
в том то и дело что в результате - ошибка  
 
Перейти    
Разница между временем в Power Query
 
#
11.02.2021 10:22:08
buchlotnik, на форуме тоже найти не могу. Может я что то не так ищу (((
 
Перейти    
Разница между временем в Power Query
 
#
10.02.2021 22:35:33
Добрый вечер. Помогите решить проблему. В Power Query есть столбец со временем,  нужно сравнить время во второй строки с временем из первой строки, потом время из третей строки со временем из второй, четвертой с третей и так дальше. Если разница между временами больше 20 секунд пускай выводит 1, если меньше 20 секунд тогда 0. Я пытался привязаться к столбцу индекса. if [Время]-[Время]{[Индекс]-1}> time 00:00:20 then "1" else "0". Но это не дало результата. В интернете ответ найти не могу. Пример прикрепить сейчас не могу (((
 
Перейти    
Макрос для обновления таблицы Power Query
 
#
04.02.2021 21:25:17
Андрей VG, спасибо. но что то не так. пишет object variable or with block variable not set
 
Перейти    
Макрос для обновления таблицы Power Query
 
#
04.02.2021 21:01:32
Добрый вечер.
Помогите, пожалуйста, создать макрос который будет обновлять таблицу которая загружена из PQ на лист Данные и имеет название "Таблица 1". При этом остальные данные (сводные таблицы и таблицы из PQ) обновляться не должны. Файл пример сейчас прикрепить не могу. Сорий ((
 
Перейти    
Макрос для копирования данных с листа на другой лист в нужном порядке.
 
#
02.02.2021 18:13:51
Андрей_26, именно так и нужно.
скрытые колонки я то и не заметил.
спасибо )))
 
Перейти    
Макрос для копирования данных с листа на другой лист в нужном порядке.
 
#
02.02.2021 16:53:04
Добрый день. Помогите создать макрос для  копирования данных с листа на другой лист в нужном порядке.
Краткое описание : с листа ДАННЫЕ нужно скопировать по очереди информацию на другой лист и при этом рядом ставить текст из заголовков ( выделено цветом).
Файл пример - прикрепляю.
Заранее спасибо ))
 
Перейти    
PQ изменить формат всех столбцов кроме одного.
 
#
22.01.2021 18:50:51
buchlotnik, спасибо. все работает ))) ура ура )))
Файл с рабочего компьютера не могу скинуть. даже такой вариант который вы показали меня устраивает ))
 
Перейти    
PQ изменить формат всех столбцов кроме одного.
 
#
22.01.2021 18:40:41
Добрый вечер. Подскажите, в таблице постоянно меняется количество столбцов и все они должны быть  в числовом формате, кроме одного - Сведено. Как это прописать в коде ? А точнее в самом последнем шаге. Сведено должен быть текстовым
Код
let
    Источник = Excel.Workbook(File.Contents("C:\Users\KovalYD\Desktop\СПКО\Е01 до справки.xlsx"), null, true),
    #"Е01 до справки_Sheet" = Источник{[Item="Е01 до справки",Kind="Sheet"]}[Data],
    #"Измененный тип" = Table.TransformColumnTypes(#"Е01 до справки_Sheet",{{"Column1", type text}, {"Column2", type text}, {"Column3", type any}, {"Column4", type any}, {"Column5", type text}, {"Column6", type text}, {"Column7", type text}, {"Column8", type any}, {"Column9", type text}, {"Column10", type text}, {"Column11", type text}, {"Column12", type text}, {"Column13", type text}, {"Column14", type text}, {"Column15", type text}, {"Column16", type text}, {"Column17", type text}, {"Column18", type text}, {"Column19", type text}, {"Column20", type text}, {"Column21", type text}, {"Column22", type text}, {"Column23", type text}, {"Column24", type text}, {"Column25", type any}, {"Column26", type text}, {"Column27", type any}, {"Column28", type any}, {"Column29", type text}, {"Column30", type any}, {"Column31", type any}, {"Column32", type text}, {"Column33", type text}, {"Column34", type text}, {"Column35", type text}, {"Column36", type any}, {"Column37", type any}, {"Column38", type text}, {"Column39", type text}, {"Column40", type text}, {"Column41", type text}, {"Column42", type text}, {"Column43", type any}, {"Column44", type text}, {"Column45", type any}, {"Column46", type any}, {"Column47", type any}, {"Column48", type any}, {"Column49", type any}, {"Column50", type any}, {"Column51", type any}, {"Column52", type any}, {"Column53", type any}, {"Column54", type any}, {"Column55", type any}, {"Column56", type text}, {"Column57", type any}, {"Column58", type any}, {"Column59", type any}, {"Column60", type any}, {"Column61", type any}, {"Column62", type any}, {"Column63", type any}, {"Column64", type any}, {"Column65", type any}, {"Column66", type text}, {"Column67", type any}, {"Column68", type text}, {"Column69", type any}, {"Column70", type text}, {"Column71", type text}, {"Column72", type text}, {"Column73", type any}, {"Column74", type any}, {"Column75", type any}, {"Column76", type any}, {"Column77", type any}, {"Column78", type any}, {"Column79", type any}, {"Column80", type text}, {"Column81", type any}, {"Column82", type any}, {"Column83", type any}, {"Column84", type any}, {"Column85", type any}, {"Column86", type any}, {"Column87", type text}, {"Column88", type any}, {"Column89", type any}, {"Column90", type text}, {"Column91", type any}, {"Column92", type text}, {"Column93", type any}, {"Column94", type any}, {"Column95", type any}, {"Column96", type text}, {"Column97", type any}, {"Column98", type text}, {"Column99", type text}, {"Column100", type any}, {"Column101", type text}, {"Column102", type text}, {"Column103", type text}, {"Column104", type text}, {"Column105", type text}, {"Column106", type text}, {"Column107", type any}, {"Column108", type text}, {"Column109", type text}, {"Column110", type text}, {"Column111", type text}, {"Column112", type text}, {"Column113", type any}, {"Column114", type text}, {"Column115", type any}, {"Column116", type text}, {"Column117", type text}, {"Column118", type any}, {"Column119", type text}, {"Column120", type text}, {"Column121", type text}, {"Column122", type text}, {"Column123", type any}, {"Column124", type any}, {"Column125", type text}, {"Column126", type any}, {"Column127", type any}, {"Column128", type any}, {"Column129", type text}, {"Column130", type text}, {"Column131", type any}, {"Column132", type any}, {"Column133", type any}, {"Column134", type text}, {"Column135", type any}, {"Column136", type any}, {"Column137", type text}, {"Column138", type text}, {"Column139", type text}, {"Column140", type text}, {"Column141", type text}, {"Column142", type text}, {"Column143", type any}, {"Column144", type any}, {"Column145", type text}, {"Column146", type any}, {"Column147", type any}, {"Column148", type text}, {"Column149", type text}, {"Column150", type text}, {"Column151", type any}, {"Column152", type text}, {"Column153", type text}, {"Column154", type text}, {"Column155", type text}, {"Column156", type text}, {"Column157", type text}, {"Column158", type text}, {"Column159", type text}, {"Column160", type text}, {"Column161", type text}, {"Column162", type text}, {"Column163", type text}, {"Column164", type text}, {"Column165", type text}, {"Column166", type text}, {"Column167", type text}, {"Column168", type text}, {"Column169", type text}, {"Column170", type text}, {"Column171", type any}, {"Column172", type any}, {"Column173", type any}, {"Column174", type any}, {"Column175", type any}, {"Column176", type text}, {"Column177", type text}, {"Column178", type text}, {"Column179", type text}, {"Column180", type text}, {"Column181", type text}, {"Column182", type text}, {"Column183", type text}, {"Column184", type any}, {"Column185", type any}, {"Column186", type text}, {"Column187", type text}, {"Column188", type any}, {"Column189", type text}, {"Column190", type any}, {"Column191", type any}, {"Column192", type any}, {"Column193", type text}, {"Column194", type text}, {"Column195", type text}, {"Column196", type text}, {"Column197", type text}, {"Column198", type text}, {"Column199", type text}, {"Column200", type text}, {"Column201", type any}, {"Column202", type any}, {"Column203", type text}, {"Column204", type any}, {"Column205", type any}, {"Column206", type text}, {"Column207", type any}, {"Column208", type text}, {"Column209", type any}, {"Column210", type any}, {"Column211", type any}, {"Column212", type text}, {"Column213", type any}, {"Column214", type any}, {"Column215", type any}, {"Column216", type any}, {"Column217", type any}, {"Column218", type any}, {"Column219", type text}, {"Column220", type text}, {"Column221", type text}, {"Column222", type any}, {"Column223", type any}, {"Column224", type any}, {"Column225", type text}, {"Column226", type text}, {"Column227", type text}, {"Column228", type any}, {"Column229", type any}, {"Column230", type any}, {"Column231", type any}, {"Column232", type any}, {"Column233", type any}, {"Column234", type text}, {"Column235", type text}, {"Column236", type text}, {"Column237", type text}, {"Column238", type any}, {"Column239", type any}, {"Column240", type any}, {"Column241", type any}, {"Column242", type any}, {"Column243", type text}, {"Column244", type text}, {"Column245", type text}, {"Column246", type text}, {"Column247", type text}, {"Column248", type text}, {"Column249", type text}, {"Column250", type text}, {"Column251", type text}, {"Column252", type text}, {"Column253", type text}}),
    #"Удаленные верхние строки" = Table.Skip(#"Измененный тип",1),
    #"Транспонированная таблица" = Table.Transpose(#"Удаленные верхние строки"),
    #"Разделить столбец по разделителю1" = Table.SplitColumn(#"Транспонированная таблица", "Column1", Splitter.SplitTextByEachDelimiter({" "}, QuoteStyle.Csv, false), {"Column1.1", "Column1.2"}),
    #"Транспонированная таблица1" = Table.Transpose(#"Разделить столбец по разделителю1"),
    #"Повышенные заголовки" = Table.PromoteHeaders(#"Транспонированная таблица1", [PromoteAllScalars=true]),
    #"Удаленные верхние строки1" = Table.Skip(#"Повышенные заголовки",1),
    #"Разделить столбец по разделителю" = Table.SplitColumn(#"Удаленные верхние строки1", "Контрагент", Splitter.SplitTextByEachDelimiter({"-"}, QuoteStyle.Csv, false), {"Контрагент.1", "Контрагент.2"}),
    #"Добавлен пользовательский объект" = Table.AddColumn(#"Разделить столбец по разделителю", "Пользовательская", each Text.Remove([Контрагент.2],{"0".."9","(",")"})),
    #"Замененное значение" = Table.ReplaceValue(#"Добавлен пользовательский объект","-"," ",Replacer.ReplaceText,{"Пользовательская"}),
    #"Удаленные столбцы" = Table.RemoveColumns(#"Замененное значение",{"Контрагент.1", "Контрагент.2", "CE", "CE_1"}),
    #"Переупорядоченные столбцы" = Table.ReorderColumns(#"Удаленные столбцы",{"Пользовательская", "Характер", "801010", "801020", "801555", "802010", "802021", "802022", "802029", "802555", "803100", "803210", "803220", "803230", "803240", "803250", "803300", "803555", "804000", "804555", "805000", "805555", "806011", "806111", "806121", "806012", "806112", "806122", "806020", "806030", "806041", "806311", "806312", "806321", "806322", "806401", "806402", "806500", "806555", "807010", "807020", "807030", "807040", "807051", "807059", "807061", "807062", "807063", "807069", "807070", "807080", "807090", "807100", "807110", "807121", "807122", "807123", "807124", "807129", "807130", "807140", "807150", "807161", "807162", "807169", "807170", "807990", "807555", "808050", "808060", "810101", "810102", "810311", "810321", "810331", "810341", "810350", "810555", "820101", "820102", "820311", "820321", "820331", "820350", "820555", "830100", "830200", "830300", "830400", "830555", "841100", "841200", "841300", "841555", "842100", "842200", "842300", "842500", "842510", "842520", "842700", "842800", "842990", "842555", "845010", "845021", "845022", "845023", "845024", "845025", "845026", "845027", "845028", "845029", "845031", "845032", "845033", "845034", "845035", "845036", "845039", "845040", "845051", "845052", "845059", "845060", "845061", "845070", "845071", "845081", "845082", "845091", "845101", "845102", "845103", "845104", "845105", "845106", "845107", "845109", "845111", "845112", "845121", "845122", "845123", "845129", "845131", "845132", "845133", "845134", "845139", "845141", "845149", "845151", "845152", "845153", "845154", "845155", "845156", "845157", "845158", "845159", "845161", "845162", "845163", "845164", "845165", "845166", "845169", "845170", "845181", "845182", "845189", "845190", "845201", "845202", "845203", "845204", "845301", "845555", "845991", "845992", "845993", "845994", "845995", "845996", "845997", "845998", "845999", "846030", "846040", "846050", "846060", "846090", "846555", "847121", "847200", "847555", "CE_2", "844000", "844555", "843100", "843200", "843555", "843900", "830555_3", "830555_4", "830555_5", "830555_6", "DIS3_NA", "DIS3_NA_7", "DIS3_NA_8", "DIS3_NA_9", "DIS3_NA_10", "DIS3_NA_11", "DIS3_NA_12", "DIS3_NA_13", "DIS3_NA_14", "DIS3_NA_15", "DIS3_NA_16", "DIS3_NA_17", "DIS3_NA_18", "DIS3_NA_19", "DIS3_NA_20", "DIS3_NA_21", "CE_22", "DIS3_NA_23", "DIS3_NA_24", "830555_25", "848000", "848110", "848120", "848131", "848132", "848133", "848139", "848150", "848160", "848170", "848180", "848201", "848209", "848301", "848302", "848309", "848400", "848501", "848502", "848509", "848555", "848600"}),
    #"Объединенные столбцы" = Table.CombineColumns(#"Переупорядоченные столбцы",{"Пользовательская", "Характер"},Combiner.CombineTextByDelimiter(" ", QuoteStyle.None),"Сведено"),
    #"Измененный тип1" = Table.TransformColumnTypes(#"Объединенные столбцы",List.Transform(Table.ColumnNames(#"Объединенные столбцы"), each {_, type number}))
in
    #"Измененный тип1"
 
Перейти    
Макрос на выборку данных из таблицы для создания новой таблицы в необходимом формате
 
#
22.01.2021 13:47:56
спасибо. работает.
 
Перейти    
Макрос на выборку данных из таблицы для создания новой таблицы в необходимом формате
 
#
22.01.2021 11:10:29
Добрый день. Помогите решить задачу. Нужен макрос который будет на листе с данными проверять наличие сумм в указанном диапазоне и если сумма есть переносить ее на другой лист с указанием названия строки из колонки "А" и указанием названия столбца из строки "1"
Файл пример с образцом данных и примером нужного решения прикрепляю.
Заранее спасибо за помощь )))
 
Перейти    
Макрос на выборку данных из таблицы с дальнейшей подстановкой в столбцы
 
#
06.01.2021 09:48:35
Mershik, спасибо. все работает как надо ))  
 
Перейти    
Страницы: 1 2 След.
Наверх