Автоматическое переобразование введеных чисел в данные из таблицы

[Tank302]

Всем привет! Помогите начинающему юзеру по роботе с VBA.
Подскажите макрос, или хотя б посоветуйте как решить следующую задачу:

Есть таблица основных средств компании (мебель, комп. техника и др.) на первом листке, в другую нужно виводить результат.

В связи с перемещением\инвентеризацией будет использоватся сканер штрихкодов. При сканировании сканер автоматически забивает числа (инвентарные номера) в столбец по вертикали, тоисть после каждого считивание жмёт Enter.

Нужно: чтоб вместо чисел автоматически подставлялось название ОС и его параметры: серийный номер, место располажения, ответственное лицо, амортизационная стоимость и тд и тп.
Тоисть, после каждого введения числа на Лист2 автоматически подставлялись значени из таблицы на Листе1.


Я пробовал сделать ето через собственную функцию:

Function Indkod(Скан, Код)
If Скан = Код Then
Indkod = Скан
End If
End Function

Скан - ето число полученое от сканера
Код - Инвентарній номер из таблицы.

Результат функции: еслии я вписывал номер и он соответствувал Коду, то в ячецку вставлялся етот код, но:
как придумать, чтоб вствлялся не только код а и все значения из таблицы, и чтоб поиск был по всех кодах а не по 1 я не додумался

Может есть другой, больее гибкий способ?

[EducatedFool]

Вряд ли тут нужны пользовательские функции.
Достаточно будет простейших формул.

Выкладывайте свой файл, пометив ячейки, куда будут заноситься скан-коды, и укажите, что долно получиться в результате.

[Tank302]

OZ_2.rar

в итоге должен быть список всех проскинораных основных средств.

[Serge 007]

EducatedFool был прав.
Достаточно ВПР()

[Tank302]

Сообщение от Serge 007

EducatedFool был прав.
Достаточно ВПР()

Нифигасе, я думал такие задачи только спомощью VBS делаются
Читаю хелп по етой функции, пробовал сам зделать, нет, нифига, подставляет только первое значение, а остальные нет
Вот так тупо переписал формулу и все, не понимаю ее

Кстати, а можно зделать так что б не отображались

0 #Н/Д #Н/Д #Н/Д ?

Ето мне нужно протянуть формулу примерно на 200 строк, - подготовить таблицу, а там уже вся таблица в #Н/Д

[Tank302]

уже разобрался, но где вы узнали что номер столбца можно заменить виражением СТОЛБЕЦ()-1 ??? В хелпе такого нету

[R Dmitry]

Сообщение от Tank302

уже разобрался, но где вы узнали что номер столбца можно заменить виражением СТОЛБЕЦ()-1 ??? В хелпе такого нету

в хелпе вообще многого нету, зато оно есть в мозгах у людей
ошибки убираются функцией ЕОШИБКА или условным форматированием убирается видимость этих ошибок

[Tank302]

Сообщение от R Dmitry

ошибки убираются функцией ЕОШИБКА или условным форматированием убирается видимость этих ошибок

подробнее пожалуйста

[Tank302]

Всем большое спасибо, проверил работу со сканером - то что надо

Только вот есче одна проблемка - как в Лист3 виводить все данные не попавшые в Лист2 ?

Тоисть как например с помощью кнопки зделать пересчет, или ето опять таки можно зделать с помощью стандартных функций?

Среди всех наиболее подходящая БИЗВЛЕЧЬ но не могу придумать как сформулировать критерий отбора. Если не трудно подскажите пожалуйста

[Serge 007]

Сообщение от Tank302

Только вот есче одна проблемка - как в Лист3 виводить все данные не попавшые в Лист2 ?

Тоисть как например с помощью кнопки зделать пересчет, или ето опять таки можно зделать с помощью стандартных функций?

С помощью стандартных функций.
См. вложение.

ЗЫ Заодно и пример борьбы с #Н/Д