Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/EAN 8 в excel - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » EAN 8 в excel (Формулы/Formulas)
EAN 8 в excel
sekii Дата: Четверг, 08.02.2018, 17:34 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 43
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Добрый день.
А нет ли у кого готового генератора штрих кода в формате EAN 8 ?
Нужно вычислить 8-ю контрольную цифру в коде.
Спасибо.
 
Ответить
СообщениеДобрый день.
А нет ли у кого готового генератора штрих кода в формате EAN 8 ?
Нужно вычислить 8-ю контрольную цифру в коде.
Спасибо.

Автор - sekii
Дата добавления - 08.02.2018 в 17:34
bmv98rus Дата: Четверг, 08.02.2018, 19:36 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4098
Репутация: 766 ±
Замечаний: 0% ±

Excel 2013/2016


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
СообщениеGoogle сломался? https://yandex.ru/search/?text=ean8%20vba&clid=2233627&lr=2

http://am.rusimport.ru/msaccess/topic.aspx?ID=197

Автор - bmv98rus
Дата добавления - 08.02.2018 в 19:36
krosav4ig Дата: Четверг, 08.02.2018, 23:31 | Сообщение № 3
Группа: Друзья
Ранг: Старожил
Сообщений: 2346
Репутация: 989 ±
Замечаний: 0% ±

Excel 2007,2010,2013


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеcode 39 - EAN 8 - EAN 13

Автор - krosav4ig
Дата добавления - 08.02.2018 в 23:31
sekii Дата: Пятница, 09.02.2018, 09:38 | Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 43
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013


google конечно хорошо, но видимо я плохо умею искать - попадаются то платные программы, то непонятные vba...
 
Ответить
Сообщение

google конечно хорошо, но видимо я плохо умею искать - попадаются то платные программы, то непонятные vba...

Автор - sekii
Дата добавления - 09.02.2018 в 09:38
sekii Дата: Пятница, 09.02.2018, 09:39 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 43
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
code 39 - EAN 8 - EAN 13

здесь нужно прописывать все 8 цифр, а я вот и хочу что бы 8-я автоматически считалась.
Мне нужно для 100 моих кодов посчитать 8-ю цифру
 
Ответить
Сообщение
code 39 - EAN 8 - EAN 13

здесь нужно прописывать все 8 цифр, а я вот и хочу что бы 8-я автоматически считалась.
Мне нужно для 100 моих кодов посчитать 8-ю цифру

Автор - sekii
Дата добавления - 09.02.2018 в 09:39
bmv98rus Дата: Пятница, 09.02.2018, 11:51 | Сообщение № 6
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4098
Репутация: 766 ±
Замечаний: 0% ±

Excel 2013/2016
например так. массивная
Код
=RIGHT(10-MOD(SUM(MID(A1;ROW($A$1:$A$7);1)*CHOOSE(ISODD(ROW($A$1:$A$7))+1;1;3));10);1)
или даже
Код
=RIGHT(10-MOD(SUM(MID(A1;ROW($A$1:$A$7);1)*(MOD(ROW($A$1:$A$7);2)*2+1));10);1)
или не массивная
Код
=RIGHT(10-MOD(SUMPRODUCT(MID(A1;ROW($A$1:$A$7);1)*(MOD(ROW($A$1:$A$7);2)*2+1));10);1))

если нужно число а не цифру то =--RIGHT .......


Замечательный Временно просто медведь , процентов на 20.

Сообщение отредактировал bmv98rus - Пятница, 09.02.2018, 13:12
 
Ответить
Сообщениенапример так. массивная
Код
=RIGHT(10-MOD(SUM(MID(A1;ROW($A$1:$A$7);1)*CHOOSE(ISODD(ROW($A$1:$A$7))+1;1;3));10);1)
или даже
Код
=RIGHT(10-MOD(SUM(MID(A1;ROW($A$1:$A$7);1)*(MOD(ROW($A$1:$A$7);2)*2+1));10);1)
или не массивная
Код
=RIGHT(10-MOD(SUMPRODUCT(MID(A1;ROW($A$1:$A$7);1)*(MOD(ROW($A$1:$A$7);2)*2+1));10);1))

если нужно число а не цифру то =--RIGHT .......

Автор - bmv98rus
Дата добавления - 09.02.2018 в 11:51
sekii Дата: Пятница, 09.02.2018, 12:14 | Сообщение № 7
Группа: Пользователи
Ранг: Новичок
Сообщений: 43
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
=ОСТАТ(СУММ(ПСТР(A1;СТРОКА($A$1:$A$7);1)*ВЫБОР(ЕНЕЧЁТ(СТРОКА($A$1:$A$7))+1;1;3));10)

вроде работает, буду проверять
Спасибо!
 
Ответить
Сообщение
=ОСТАТ(СУММ(ПСТР(A1;СТРОКА($A$1:$A$7);1)*ВЫБОР(ЕНЕЧЁТ(СТРОКА($A$1:$A$7))+1;1;3));10)

вроде работает, буду проверять
Спасибо!

Автор - sekii
Дата добавления - 09.02.2018 в 12:14
bmv98rus Дата: Пятница, 09.02.2018, 13:13 | Сообщение № 8
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4098
Репутация: 766 ±
Замечаний: 0% ±

Excel 2013/2016
вроде работает

нет не работает ибо я забыл из 10 вычесть. исправил выше.


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщение
вроде работает

нет не работает ибо я забыл из 10 вычесть. исправил выше.

Автор - bmv98rus
Дата добавления - 09.02.2018 в 13:13
krosav4ig Дата: Пятница, 09.02.2018, 13:56 | Сообщение № 9
Группа: Друзья
Ранг: Старожил
Сообщений: 2346
Репутация: 989 ±
Замечаний: 0% ±

Excel 2007,2010,2013
формула из фала EAN_8_with_chart.xlsx по ссылке из моего поста
Код
=ОСТАТ(10-ОСТАТ(СУММ(--ПСТР(A1;{2;4;6};1);ПСТР(A1;{1;3;5;7};1)*3);10);10)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеформула из фала EAN_8_with_chart.xlsx по ссылке из моего поста
Код
=ОСТАТ(10-ОСТАТ(СУММ(--ПСТР(A1;{2;4;6};1);ПСТР(A1;{1;3;5;7};1)*3);10);10)

Автор - krosav4ig
Дата добавления - 09.02.2018 в 13:56
bmv98rus Дата: Пятница, 09.02.2018, 18:01 | Сообщение № 10
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4098
Репутация: 766 ±
Замечаний: 0% ±

Excel 2013/2016
krosav4ig, Все никак от циклов не отделаюсь :-). Тогда уж совсем так
Код
=MOD(10-MOD(SUM(MID(A1;{1;2;3;4;5;6;7};1)*{3;1;3;1;3;1;3});10);10)


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщениеkrosav4ig, Все никак от циклов не отделаюсь :-). Тогда уж совсем так
Код
=MOD(10-MOD(SUM(MID(A1;{1;2;3;4;5;6;7};1)*{3;1;3;1;3;1;3});10);10)

Автор - bmv98rus
Дата добавления - 09.02.2018 в 18:01
Мир MS Excel » Вопросы и решения » Вопросы по Excel » EAN 8 в excel (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!