Перенос значений

Iur.ii Пользователь Сообщений: 52 Регистрация: 29.08.2023	#1 01.11.2024 13:00:14 Добрый день! Просьба помочь решить задачу, нужно переносить остаток в начало, с учетом что разные наименования и в разных местах могут быть Прикрепленные файлы Книга1.xlsx (9.65 КБ)

МатросНаЗебре

Пользователь

Сообщений: 7637 Регистрация: 05.02.2014

01.11.2024 14:14:02

Код
=ВПР(B5;B6:$D$20;3;0)

Если, конечно, не это

Цитата
написал: разные наименования и в разных местах могут быть

Iur.ii

Пользователь

Сообщений: 52 Регистрация: 29.08.2023

01.11.2024 14:24:54

МатросНаЗебре, спасибо!

Для наглядности более подробный пример, чтобы допустим я вставил формулу в ячейку D9 и чтобы перенеслось значение из E5, потом чтобы в D13, перенеслось значение из Е9. Т.е. последний остаток переносится в начало, и чтобы учитывал все наименования и другие, такая формула нужна. Суть чтобы каждый раз остаток переносился в столбец "начало", и так по каждому наименованию.

Прикрепленные файлы

Книга1.xlsx (9.67 КБ)

Hugo

Пользователь

Сообщений: 25609 Регистрация: 22.12.2012

01.11.2024 14:44:24

Цитата
Iur.ii написал: чтобы допустим я вставил формулу в ячейку D9 и чтобы перенеслось значение из E5,

Код
=ВПР(B9;$B$5:E8;4;0)

Но только не перенеслось, а скопировалось/отобразилось, формулы ничего переносить не могут. Не путайте, а то напишем макрос, который перенесёт ))

Алексей Абраменко Пользователь Сообщений: 114 Регистрация: 17.02.2023	#5 01.11.2024 14:47:19 Добрый день! вариант Прикрепленные файлы Книга1 (8).xlsx (10.06 КБ)

МатросНаЗебре

Пользователь

Сообщений: 7637 Регистрация: 05.02.2014

01.11.2024 14:51:10

Код
=ЕСЛИОШИБКА(ВПР(B5;B6:$D$20;3;0);D5-100)

Iur.ii Пользователь Сообщений: 52 Регистрация: 29.08.2023	#7 01.11.2024 14:58:43 Всем большое спасибо за попытки!, но не работаю все решения. Можно просто сравнить что было и что стало после формулы

Hugo

Пользователь

Сообщений: 25609 Регистрация: 22.12.2012

01.11.2024 15:02:34

Цитата
Iur.ii написал: но не работаю все решения

- Вы не умеете копировать!

Iur.ii Пользователь Сообщений: 52 Регистрация: 29.08.2023	#9 01.11.2024 15:07:38 Итоговые значения отличаются Прикрепленные файлы Книга1.xlsx (10.22 КБ) Изменено: Iur.ii - 01.11.2024 15:07:52

Hugo Пользователь Сообщений: 25609 Регистрация: 22.12.2012	#10 01.11.2024 15:09:39 Iur.ii, Ну да, если есть повторы то да... На какой версии Экселя работаете? Это важно. С молотком ошиблись Изменено: Hugo - 01.11.2024 15:13:15

Iur.ii Пользователь Сообщений: 52 Регистрация: 29.08.2023	#11 01.11.2024 15:17:42 2019 год, ПРОСМОТРХ нет Изменено: Iur.ii - 01.11.2024 15:18:07

Hugo Пользователь Сообщений: 25609 Регистрация: 22.12.2012	#12 01.11.2024 15:24:31 Тогда я пас. Но уверен решение формулами есть, думать лень. Я бы свою UDF скорее использовал, проще, меньше в ячейку писать.

Iur.ii Пользователь Сообщений: 52 Регистрация: 29.08.2023	#13 01.11.2024 15:54:16 Всем большое спасибо! Вопрос действительно не простой.

Hugo Пользователь Сообщений: 25609 Регистрация: 22.12.2012	#14 01.11.2024 15:59:43 обычно есть ещё поле с датами. Ну или его можно добавить. Отсортировать наоборот. Юзать ВПР()

sotnikov

Пользователь

Сообщений: 257 Регистрация: 29.01.2016

#15

01.11.2024 16:02:29

pq
let f=(x)=>Table.FromColumns({x{0},{x{1}{0}}&List.RemoveLastN(x{2}),x{2},x{3}},nms), from = Excel.CurrentWorkbook(){[Name="tbl"]}[Content], ind = Table.AddIndexColumn(from,"id"), nms = Table.ColumnNames(ind), gr = Table.Group(ind,"Наименование",{"tmp",(x)=>f(Table.ToColumns(x))})[tmp], to = Table.SelectColumns(Table.Sort(Table.Combine(gr),"id"),List.RemoveLastN(nms)) in to

Прикрепленные файлы

Книга1.xlsx (23.26 КБ)