Всем салют!
Задача вроде как плёвая,но не для меня...
После выгрузки из Экселя,в справочнике "таких-то лиц", почтовый индекс пишется так 123 456,а должен 123456,то есть без пробела.


Функция ПолучитьПочтовыйИндексИзАдреса(Знач Адрес)
ПочтовыйИндекс = "";

ПодстрокиАдреса = СтрЗаменить(Адрес, " ", Символы.ПС);


// Переберем подстроки адреса
Для НомСтр = 1 По СтрДлинаСтроки(ПодстрокиАдреса) Цикл

Если СтрДлинаСтроки(ПочтовыйИндекс) >= 6 Тогда
Прервать;
КонецЕсли;

ПочтовыйИндекс = ПочтовыйИндекс + ВернутьТолькоЧисла(СтрПолучитьСтроку(ПодстрокиАдреса, НомСтр));

КонецЦикла;

Возврат ПочтовыйИндекс;

КонецФункции

///////////////////////////////////////////////////////////////////

Функция ВернутьТолькоЧисла(ЗНачениеСтроки)

ТолькоЧисла = "";

Для НомСим = 1 По СтрДлинаСтроки(ЗНачениеСтроки) Цикл

ТекСимвол = Сред(ЗНачениеСтроки, НомСим, 1);

Если Найти("0123456789", ТекСимвол) > 0 Тогда

ТолькоЧисла = ТолькоЧисла + ТекСимвол;

КонецЕсли;

КонецЦикла;

Возврат ТекСимвол;

КонецФункции

СтрЗаменить(ТвойИндекс, Символы.НПП, "")

Формат("ГП=0");

Вродь Формат("ГП=0");

Что значит Формат("ГП=0")?

10005000я жертва уже...

(4) Кароч у тя пробел пишется из-за какой то там кодировки, а это преобразует к нормальному виду.

Символ(160) проверь эт не простой пробел

(1) + 1024
(2),(3) никогда не юзал