Нумерация уникальных артикулов: если артикул повторятся, то ему присваевается один и тот же номер.

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

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

16.09.2024 21:43:41

Добрый день! Я далеко не продвинутый пользователь excel, поэтому прошу помощи, уважаемые специалисты. Необходимо пронумеровать артикулы в документе по принципу 1 артикул=одинаковый номер. Нумерация должна идти по порядку. Прилагаю файлик-образец. Подскажите, пожалуйста! Совсем замучилась: сижу и нумерую по фильтру вручную(

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

Пример нумерации.xlsx (8.27 КБ)

DAB Пользователь Сообщений: 333 Регистрация: 18.01.2019	#2 16.09.2024 21:50:19 ошибся, удалено Изменено: DAB - 16.09.2024 22:24:32

gling

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

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

16.09.2024 21:54:36

Здравствуйте.
Попробуйте такой вариант

Код
=ЕСЛИОШИБКА(ИНДЕКС($A$1:A1;ПОИСКПОЗ(B2;$B$1:B1;));МАКС($A$1:A1)+1)

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

Пример нумерации.xlsx (8.86 КБ)

Hugo

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

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

16.09.2024 22:06:08

Daril, ну и ещё как вариант - сделать где-то уникальный список этих артикулов (формулой, или удалив дубликаты), пронумеровать правее как угодно, и затем тянуть оттуда эти номера ВПР().
Тут главное не путать артикулы текстом с артикулами числом.

sotnikov

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

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

16.09.2024 22:29:36

pq
let f=(x)=>{Record.Field(dict,Text.From(x{0}))}&x, dict = Record.FromList({1..List.Count(lst)},lst), from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content], lst = List.Transform(List.Sort(List.Distinct(from[артикул])),Text.From), to = Table.FromList(Table.ToList(from,f),(x)=>x,{"номер"}&Table.ColumnNames(from)) in to

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

Пример нумерации.xlsx (17.65 КБ)

Daril

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

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

17.09.2024 11:11:12

Цитата
написал: Код=ЕСЛИОШИБКА(ИНДЕКС($A$1:A1;ПОИСКПОЗ(B2;$B$1:B1;));МАКС($A$1:A1)+1)

Получается, все работает! Огромное спасибо!!

Daril

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

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

17.09.2024 11:15:19

Цитата
написал: pqlet f=(x)=>{Record.Field(dict,Text.From(x{0}))}&x, dict = Record.FromList({1..List.Count(lst)},lst), from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content], lst = List.Transform(List.Sort(List.Distinct(from[артикул])),Text.From), to = Table.FromList(Table.ToList(from,f),(x)=>x,{"номер"}&Table.ColumnNames(from))in to

Спасибо, что откликнулись) но даже готовые макросы - это не мой уровень, нужно еще подрасти. Сохраню)

Hugo

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

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

17.09.2024 11:55:05

Цитата
Daril написал: Сохраню)

- только это не макрос. Там у спойлера указано что это.

Daril

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

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

18.09.2024 22:28:09

Цитата
написал: - только это не макрос. Там у спойлера указано что это.

Да, теперь вижу. Повторить запрос все равно не получилось у меня ( Хорошо, что есть формула от gling, спасибо еще раз

Бахтиёр Пользователь Сообщений: 2348 Регистрация: 15.01.2016 Excel 365	#10 19.09.2024 08:12:27 Для Excel 365/2021: =ПОИСКПОЗ(B2:B13;УНИК(B2:B13);0) Прикрепленные файлы 414141.xlsx (9.72 КБ)

Павел \Ʌ/ Пользователь Сообщений: 2447 Регистрация: 09.01.2023 excel 2007, 2016	#11 19.09.2024 10:13:34 вариант: =ЕСЛИОШИБКА(СРЗНАЧЕСЛИ(B$1:B1;B2;A$1:A1);МАКС(A$1:A1)+1)