Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.05.2016, 01:41   #1
Kuselmann
 
Регистрация: 08.05.2016
Сообщений: 3
По умолчанию Вытащить из строки набор символов с прибавлением +1 в ячейку

Дорогие повелители VBA и Excel!

Признаю свою немощность и прошу о помощи!
Задача: Через клавиатуру в одну строку набираются 3-х значные значения. Например: "q21 q22 q21 q21 q23 q23 q22" и т.д. необходимо сотворить скрипт, который вытаскивал (переводил... раскодировал) бы из этой строки данные значения,... распределяя их в мною выбранные ячейки добавляя туда за каждое повторение +1.
например: я пишу в строку "q21" то в ячейку (например) B1 прибавляется +1... появилось оно 3 раза "q21 q23 q24 q21 q21"то тогда в ячейку B1 добавляется +3 а "q23" добавляет +1 например в ячейку B2 а q24 добавляет +1 в B3 и т.д.
Спасибо на добром коде! Готов отблагодарить средствами благодарности! )
Kuselmann вне форума Ответить с цитированием
Старый 08.05.2016, 03:13   #2
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

посмотрите эту надстройку
http://excelvba.ru/programmes/BarcodeScanner
(у вас похожая задача)
только там ввод не в ячейку, а текстовое поле на форме

в настройках, поставьте длину штрихкода = 3, или символ окончания штрихкода = пробел
Еще пара минут на настройку, - и всё будет работать в точности как вам надо
EducatedFool вне форума Ответить с цитированием
Старый 08.05.2016, 08:19   #3
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

Как вариант решения
Вложения
Тип файла: rar Книга080516.rar (14.5 Кб, 15 просмотров)
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Старый 09.05.2016, 10:43   #4
Kuselmann
 
Регистрация: 08.05.2016
Сообщений: 3
Хорошо Класс!

Цитата:
Сообщение от Aleksandr H. Посмотреть сообщение
Как вариант решения
Спасибо за быстрый ответ! Данная схема подходит! Можно с Вами лично связаться?

Последний раз редактировалось Kuselmann; 09.05.2016 в 11:06.
Kuselmann вне форума Ответить с цитированием
Старый 09.05.2016, 12:55   #5
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

Связывайтесь, пм работает
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Старый 09.05.2016, 18:10   #6
Kuselmann
 
Регистрация: 08.05.2016
Сообщений: 3
По умолчанию

Цитата:
Сообщение от Aleksandr H. Посмотреть сообщение
Связывайтесь, пм работает
пм не работает видимо для новичков как я.. (
Kuselmann вне форума Ответить с цитированием
Старый 09.05.2016, 18:53   #7
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

там вроде как надо иметь 10 сообщений на форуме.

devid17[at]inbox[dot]ru
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Непонятный набор символов (код) в теге alt blessed HTML и CSS 3 17.11.2014 17:41
Макрос_ из названия книги Excel вытащить составляющие и вставить в указанную ячейку Alexsandrr Microsoft Office Excel 4 15.10.2013 13:44
Заставить стандартные компоненты отображать расширеный набор символов HellMercenariess Компоненты Delphi 3 01.09.2012 16:11
Обрезать набор символов MORPEH Общие вопросы Delphi 1 05.07.2012 14:38
Набор символов типа {$...} ImmortalAlexSan Общие вопросы Delphi 4 10.08.2010 22:59