Может кто знает как в подборе номенклатуры выбрать все позиции которые на экране. У меня получается выбрать только одну позицию, а как несколько ????

По задумке разработчиков 1с7 только последовательно по одной позиции.
Если знаете что такое табличное поле, то можете попробовать использовать его.

1сpp и формекс ..... установлены , может кто знает есть способ с помощью них

все можно, через свою форму и никаких формексов не нужно

1. Сделать кнопку "Выбрать все".
2. Использовать стандартный множественный выбор, но он только по одной позиции.

Ничего не выбрано обычно = выбрано всё

+ (3) С помощью ВыполнитьВыбор() можно и не в своей форме.

С помощью табличного поля легко можно реализовать выбор нескольких срок, например при нажатии кнопки Shift+Стрелка, а также Ctrl+Стрелка, при этом выбранные строки будут подсвечены другим фоном.

(0) Сделать доп. колонку в списке же можно вроде. Ставить в нее галку, и выбирать.

(8) кстати простейший вариант, только вроде 2 раза кликать нужно если без формекс

"(8) кстати простейший вариант, только вроде 2 раза кликать нужно если без формекс"
формекс удалять????? :)))

а подробнее может кто-нибудь пример кода сбросит

(0) В разных конфигурациях разные формы для подбора.
В ТиСе есть подбор по форме таблицы значений на форме, и заполнение по критериям.
В Бухии таблицы для подбора нет, проще сделать внешнюю обработку для подбора.

И что такое- позиции на экране?
Видимо, позиции из справочника.
Во многих из них есть показ остатков на складе (флажок), и есть множественный выбор.

Как то так:
Перем СписокОтмеченных;
Процедура ПриНажатииКнопкиКлавиатуры(КодКлавиши,Альт,Шифт,Контрол,Символ,ФСО)
    Если (КодКлавиши=38) и (Шифт=1) Тогда
        Если СписокОтмеченных.НайтиЗначение(ТекущийЭлемент())=0 Тогда
            СписокОтмеченных.ДобавитьЗначение(ТекущийЭлемент());
        КонецЕсли;
    КонецЕсли;
КонецПроцедуры

(0) Покажи код

(14) велосипед уже изобретен :)

если б он еще работала "ТаблицаПодбора" когда ее ставишь в главной в форме выбора

Процедура ВыбратьКонтрагента(Реж)
    Перем Фрм;
    Перем Тек;
    Если ВыбКонтрагенты.РазмерСписка()>0 Тогда
        Тек=ВыбКонтрагенты.ПолучитьЗначение(ВыбКонтрагенты.ТекущаяСтрока());
    КонецЕсли;
    ОткрытьПодбор("Справочник.Контрагенты",,Фрм,Реж,Тек);
    Фрм.ВыборГруппы(1);
КонецПроцедуры
//*******************************************
режим 0 одного
режим 1 много

+ 19
Процедура ОбработкаПодбора(ЗначПод)
    Если ЗначПод.Вид()="Контрагенты" Тогда  
        Если ВыбКонтрагенты.Принадлежит(ЗначПод)=1 Тогда
            Предупреждение("Этот контрагент уже есть в списке!");
            СтатусВозврата(0);
            Возврат;                
        КонецЕсли;
        ВыбКонтрагенты.ДобавитьЗначение(ЗначПод);
        ВыбКонтрагенты.ТекущаяСтрока(ВыбКонтрагенты.РазмерСписка());

    КонецЕсли;
КонецПроцедуры

правка20
Процедура ОбработкаПодбора(ЗначПод)
        ВыбКонтрагенты.ДобавитьЗначение(ЗначПод);
        ВыбКонтрагенты.ТекущаяСтрока(ВыбКонтрагенты.РазмерСписка());

КонецПроцедуры