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

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 71 След.
Вытянуть из ячейки числовые значения, Стоит задача из главной ячейки вынести числа в соседние ячейки, но все не так просто...
 
#
02.08.2025 13:53:50
Пожалуйста. Ctrl+E.
 
Перейти    
Разделение информации с одной строки на отдельные строки
 
#
30.07.2025 12:58:57
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Column1", type text}}),
    #"Split Column by Delimiter" = Table.SplitColumn(#"Changed Type", "Column1", Splitter.SplitTextByDelimiter(",", QuoteStyle.Csv), {"Column1.1", "Column1.2", "Column1.3"}),
    #"Unpivoted Columns" = Table.UnpivotOtherColumns(#"Split Column by Delimiter", {}, "Attribute", "Value"),
    #"Removed Columns" = Table.RemoveColumns(#"Unpivoted Columns",{"Attribute"})
in
    #"Removed Columns"
 
Перейти    
Сортировка таблицы по дате, Автоматическое перемещение (сортировка) строк.
 
#
25.07.2025 15:54:12
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table2"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Предмет проверки", type text}, {"Дата сегодняшнего дня", type date}, {"Предыдущая проверка", type date}, {"Остаток дней", Int64.Type}, {"Следующая проверка", type date}, {"Интервал проверки", Int64.Type}}),
    #"Sorted Rows" = Table.Sort(#"Changed Type",{{"Следующая проверка", Order.Ascending}})
in
    #"Sorted Rows"
Изменено: jakim - 25.07.2025 15:55:58
 
Перейти    
Автоматическая нумерация с условиями, Автоматическая нумерация ячеек с условиями и сохраняемостью при сортировке
 
#
12.07.2025 21:33:24
формула
Код
=COUNTIF(B$1:B2;B2)
 
Перейти    
Текст в ячейке разбить на буквы в ячейках
 
#
11.06.2025 11:13:39
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Replaced Value" = Table.ReplaceValue(Source," ","",Replacer.ReplaceText,{"ТЕКСТ"}),
    #"Split Column by Position" = Table.SplitColumn(#"Replaced Value", "ТЕКСТ", Splitter.SplitTextByRepeatedLengths(1), {"ТЕКСТ.1", "ТЕКСТ.2", "ТЕКСТ.3", "ТЕКСТ.4", "ТЕКСТ.5", "ТЕКСТ.6", "ТЕКСТ.7", "ТЕКСТ.8", "ТЕКСТ.9", "ТЕКСТ.10", "ТЕКСТ.11", "ТЕКСТ.12", "ТЕКСТ.13"})
in
    #"Split Column by Position"
Изменено: jakim - 11.06.2025 11:50:24
 
Перейти    
Формулой ФИЛЬТР вывести только повторяющие значение у которых статус ОТКРЫТ
 
#
08.06.2025 11:16:45
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Filtered Rows" = Table.SelectRows(Source, each ([Column2] = "открыт")),
    #"Grouped Rows" = Table.Group(#"Filtered Rows", {"Column1"}, {{"Count", each Table.RowCount(_), Int64.Type}})
in
    #"Grouped Rows"
 
Перейти    
Подсчет количества именинников в базе данных
 
#
24.05.2025 09:02:16
Формула
Код
=SUMPRODUCT(--(DAY(A2:A100)=DAY(TODAY()))*(MONTH(A2:A100)=MONTH(TODAY())))
 
Перейти    
Посчитать количество ячеек со значением больше нуля, Необходимо узнать количество ячеек со значением больше нуля при установлении фильтра
 
#
17.05.2025 21:11:28
Формула
Код
=SUMPRODUCT(--(E15:E218<>0))
 
Перейти    
Объединение всех cтолбцов в PQ, Объединение всех cтолбцов в PQ
 
#
16.04.2025 12:50:49
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="пример"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"столбец1", type text}, {"дата1", Int64.Type}, {"дата2", Int64.Type}, {"дата3", Int64.Type}, {"дата4", Int64.Type}}),
    #"Replaced Value" = Table.ReplaceValue(#"Changed Type",null,0,Replacer.ReplaceValue,{"дата1", "дата2", "дата3", "дата4"}),
    #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(#"Replaced Value", {"столбец1"}, "Attribute", "Value"),
    #"Sorted Rows" = Table.Sort(#"Unpivoted Other Columns",{{"столбец1", Order.Ascending}, {"Attribute", Order.Ascending}})
in
    #"Sorted Rows"
 
Перейти    
Расчет сверхурочных часов с переходом полуночи, Проблема создании формулы.
 
#
14.03.2025 08:36:36
Формула
=IF(C4>D4;(1-C4)+D4;D4-C4)
 
Перейти    
Расчет сверхурочных часов с переходом полуночи, Проблема создании формулы.
 
#
13.03.2025 20:17:40
Впишите время с датой,
 
Перейти    
Преобразование текста в дату
 
#
01.03.2025 16:43:09
Power Query and Custom Format Cells dd mmmm yyyy
Код
let    Source = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Столбец1", type date}})
in
    #"Changed Type"
Изменено: jakim - 01.03.2025 16:43:39
 
Перейти    
Линейная интерполяция в экселе
 
#
19.12.2024 22:24:36
Смотрите приложение
 
Перейти    
Линейная интерполяция в экселе
 
#
17.12.2024 16:56:34
Формула
Код
=PERCENTILE.EXC(B2:B9;PERCENTRANK.EXC(A2:A9;E2;ROWS($A$3:$A$9)))
 
Перейти    
Удаление пробелов в числах выгруженных из терминала QUICK
 
#
10.11.2024 15:33:38
Скопируйте Ваш пробел и через Ctrl+h удалите.
 
Перейти    
запрос PQ, аналог сводной таблицы
 
#
10.11.2024 15:25:30
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Артикул", Int64.Type}, {"Номенклатура", type text}, {"Признак", Int64.Type}, {"Цена", Int64.Type}}),
    #"Pivoted Column" = Table.Pivot(Table.TransformColumnTypes(#"Changed Type", {{"Признак", type text}}, "lt-LT"), List.Distinct(Table.TransformColumnTypes(#"Changed Type", {{"Признак", type text}}, "lt-LT")[Признак]), "Признак", "Цена")
in
    #"Pivoted Column"
 
Перейти    
Обьединение нескольких столбцов в один общий
 
#
10.11.2024 10:34:31
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Transposed Table" = Table.Transpose(Source),
    #"Added Index" = Table.AddIndexColumn(#"Transposed Table", "Index", 0, 1),
    #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(#"Added Index", {"Index"}, "Attribute", "Value"),
    #"Removed Columns" = Table.RemoveColumns(#"Unpivoted Other Columns",{"Index", "Attribute"})
in
    #"Removed Columns"
Изменено: jakim - 10.11.2024 10:35:08
 
Перейти    
При совпадении четырёх чисел из пяти в пяти столбцах, пятый столбец переносится в строку, При совпадении четырёх чисел
 
#
02.11.2024 09:47:07
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Column1", Int64.Type}, {"Column2", Int64.Type}, {"Column3", Int64.Type}, {"Column4", Int64.Type}, {"Column5", Int64.Type}}),
    #"Grouped Rows" = Table.Group(#"Changed Type", {"Column1", "Column2", "Column3", "Column4"}, {{"Count", each _, type table [Column1=number, Column2=number, Column3=number, Column4=number, Column5=number]}}),
    #"Added Custom" = Table.AddColumn(#"Grouped Rows", "Custom", each Table.AddIndexColumn([Count],"Index",1,1)),
    #"Removed Columns" = Table.RemoveColumns(#"Added Custom",{"Count"}),
    #"Expanded Custom" = Table.ExpandTableColumn(#"Removed Columns", "Custom", {"Column5", "Index"}, {"Custom.Column5", "Custom.Index"}),
    #"Pivoted Column" = Table.Pivot(Table.TransformColumnTypes(#"Expanded Custom", {{"Custom.Index", type text}}, "lt-LT"), List.Distinct(Table.TransformColumnTypes(#"Expanded Custom", {{"Custom.Index", type text}}, "lt-LT")[Custom.Index]), "Custom.Index", "Custom.Column5")
in
    #"Pivoted Column"
 
Перейти    
Из тегов html получить цвет.
 
#
28.10.2024 13:11:41
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Split Column by Delimiter" = Table.SplitColumn(Source, "Column1", Splitter.SplitTextByDelimiter(" ", QuoteStyle.Csv), {"Column1.1", "Column1.2", "Column1.3", "Column1.4"}),
    #"Changed Type" = Table.TransformColumnTypes(#"Split Column by Delimiter",{{"Column1.1", type text}, {"Column1.2", type text}, {"Column1.3", type text}, {"Column1.4", type text}}),
    #"Removed Columns" = Table.RemoveColumns(#"Changed Type",{"Column1.1", "Column1.2", "Column1.3"}),
    #"Filtered Rows" = Table.SelectRows(#"Removed Columns", each ([Column1.4] <> null)),
    #"Split Column by Delimiter1" = Table.SplitColumn(#"Filtered Rows", "Column1.4", Splitter.SplitTextByEachDelimiter({" "}, QuoteStyle.Csv, true), {"Column1.4.1", "Column1.4.2"}),
    #"Changed Type1" = Table.TransformColumnTypes(#"Split Column by Delimiter1",{{"Column1.4.1", type text}, {"Column1.4.2", type text}}),
    #"Removed Columns1" = Table.RemoveColumns(#"Changed Type1",{"Column1.4.1"}),
    #"Replaced Value" = Table.ReplaceValue(#"Removed Columns1","#","",Replacer.ReplaceText,{"Column1.4.2"}),
    #"Replaced Value1" = Table.ReplaceValue(#"Replaced Value","</a>","",Replacer.ReplaceText,{"Column1.4.2"}),
    #"Split Column by Delimiter2" = Table.SplitColumn(#"Replaced Value1", "Column1.4.2", Splitter.SplitTextByDelimiter(";>", QuoteStyle.Csv), {"Column1.4.2.1", "Column1.4.2.2"}),
    #"Changed Type2" = Table.TransformColumnTypes(#"Split Column by Delimiter2",{{"Column1.4.2.1", type text}, {"Column1.4.2.2", type text}})
in
    #"Changed Type2"
 
Перейти    
трансформирование таблицы/данных
 
#
23.10.2024 07:35:51
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Column1", type date}, {"иванов", Int64.Type}, {"петров", Int64.Type}, {"сидоров", Int64.Type}, {"кошкин", Int64.Type}, {"собачкин", Int64.Type}, {"остаток", Int64.Type}}),
    #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(#"Changed Type", {"Column1", "остаток"}, "Attribute", "Value"),
    #"Reordered Columns" = Table.ReorderColumns(#"Unpivoted Other Columns",{"Column1", "Value", "остаток", "Attribute"}),
    #"Renamed Columns" = Table.RenameColumns(#"Reordered Columns",{{"Value", "Массаа"}, {"Attribute", "Исполнитель"}, {"Column1", "Дата"}})
in
    #"Renamed Columns"
 
Перейти    
Сортировка ячеек по столбцам
 
#
15.10.2024 15:54:41
Power Query (для начинающих)
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Duplicated Column" = Table.DuplicateColumn(Source, "Column1", "Column1 - Copy"),
    #"Extracted First Characters" = Table.TransformColumns(#"Duplicated Column", {{"Column1 - Copy", each Text.Start(_, 2), type text}}),
    #"Grouped Rows" = Table.Group(#"Extracted First Characters", {"Column1 - Copy"}, {{"Count", each _, type table [Column1=text, #"Column1 - Copy"=text]}}),
    #"Added Custom" = Table.AddColumn(#"Grouped Rows", "Custom", each Table.AddIndexColumn([Count],"Index",1,1)),
    #"Expanded Custom" = Table.ExpandTableColumn(#"Added Custom", "Custom", {"Column1", "Index"}, {"Custom.Column1", "Custom.Index"}),
    #"Removed Columns" = Table.RemoveColumns(#"Expanded Custom",{"Count"}),
    #"Pivoted Column" = Table.Pivot(#"Removed Columns", List.Distinct(#"Removed Columns"[#"Column1 - Copy"]), "Column1 - Copy", "Custom.Column1"),
    #"Removed Columns1" = Table.RemoveColumns(#"Pivoted Column",{"Custom.Index"})
in
    #"Removed Columns1"
 
Перейти    
Сортировка ячеек по столбцам
 
#
15.10.2024 13:47:16
Формула
=IFERROR(INDEX($A$1:$A$8;AGGREGATE(15;6;ROW($1:$100)/(LEFT($A$1:$A$8;2)=$C1);COLUMNS($D:D)));"")
Изменено: jakim - 15.10.2024 13:47:41
 
Перейти    
Преобразовать ячейки в числа
 
#
04.10.2024 08:44:31
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Column1", type number}, {"Column2", type number}, {"Column3", type number}, {"Column4", type number}, {"Column5", type number}, {"Column6", type number}, {"Column7", type number}, {"Column8", type number}, {"Column9", type number}, {"Column10", type number}, {"Column11", type number}, {"Column12", type number}, {"Column13", type number}, {"Column14", type number}, {"Column15", type number}, {"Column16", type number}, {"Column17", type number}, {"Column18", type number}, {"Column19", type number}, {"Column20", type number}, {"Column21", type number}, {"Column22", type number}, {"Column23", type number}, {"Column24", type number}})
in
    #"Changed Type"
 
Перейти    
Преобразование текста в дату
 
#
04.10.2024 08:35:02
Без использования формул
Data-->Text to   Columns-->Next-->Next-->Date-->YMD-->Finish
 
Перейти    
Как по условию ФИО и даты подтянуть текстовое значение
 
#
27.09.2024 11:20:28
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"ФИО", type text}, {"Дата", type date}, {"Рейс", type text}}),
    #"Pivoted Column" = Table.Pivot(Table.TransformColumnTypes(#"Changed Type", {{"Дата", type text}}, "lt-LT"), List.Distinct(Table.TransformColumnTypes(#"Changed Type", {{"Дата", type text}}, "lt-LT")[Дата]), "Дата", "Рейс")
in
    #"Pivoted Column"
 
Перейти    
Как регулярным выражение удалить все после последней двойной косой черты
 
#
17.09.2024 15:14:49
Power Query и формулой в приложении
Изменено: jakim - 17.09.2024 15:15:18
 
Перейти    
Удаление лишних символов после буквенного значения
 
#
17.09.2024 12:05:46
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Набор значений", type text}}),
    #"Inserted Text Before Delimiter" = Table.AddColumn(#"Changed Type", "Text Before Delimiter", each Text.BeforeDelimiter([Набор значений], ".", 2), type text),
    #"Removed Columns" = Table.RemoveColumns(#"Inserted Text Before Delimiter",{"Набор значений"})
in
    #"Removed Columns"
 
Перейти    
Сверка 2 таблиц, но если числа равны, то эти числа дальше не сверяются.
 
#
09.09.2024 08:22:45
Формула
Код
=IFERROR(INDEX(B$2:B$6;AGGREGATE(15;6;ROW($1:$200)/(A$2:A$6=A13);COUNTIF(A$13:A13;A$2:A$3500)));"")
 
Перейти    
PQ Столбец сведения с одинаковыми атрибутами, Необходимо разсортировать строки по столбцам в PQ
 
#
06.09.2024 07:45:15
Вариант
Код
let
    Источник = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    #"Inserted Text Between Delimiters" = Table.AddColumn(Источник, "Text Between Delimiters", each Text.BetweenDelimiters([Файл], "л", "."), type text),
    #"Merged Columns" = Table.CombineColumns(#"Inserted Text Between Delimiters",{"Тип ", "Text Between Delimiters"},Combiner.CombineTextByDelimiter("", QuoteStyle.None),"Merged"),
    #"Pivoted Column" = Table.Pivot(#"Merged Columns", List.Distinct(#"Merged Columns"[Merged]), "Merged", "Файл")
in
    #"Pivoted Column"
 
Перейти    
Номера машин как отсортировать их
 
#
27.08.2024 14:36:23
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Column1", type text}, {"Column2", type text}}),
    #"Filtered Rows" = Table.SelectRows(#"Changed Type", each not Text.Contains([Column2], "*")),
    #"Sorted Rows" = Table.Sort(#"Filtered Rows",{{"Column2", Order.Ascending}})
in
    #"Sorted Rows"
 
Перейти    
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 71 След.
Наверх