Вход | Регистрация
 

Сохранить лидирующие нули при загрузке

Сохранить лидирующие нули при загрузке
Я
   Multicvet
 
12.02.20 - 08:50
Привет Мужики!
Подскажите, пожалуйста, а всю голову же сломал:
Гружу данные из Excel, при загрузке режутся лидирующие нули. Гружу, например, 000555 Артикул = СтрЗаменить(Артикул,Символы.НПП,"") в итоге загружает 555.
Как сохранить эти фак нули?
 
 
   Галахад
 
1 - 12.02.20 - 08:54
Из Экселя получаешь значение или текст?
   s_newbi
 
2 - 12.02.20 - 08:55
Артикул - переменная?

Где первая строка чтонея артикула?
   ColonelAp4u
 
3 - 12.02.20 - 08:55
(0) когда читаешь значение ячейки, приводи его сразу к типу строка.
   unregistered
 
4 - 12.02.20 - 09:15
(3) Боюсь, что он уже от excel получает число. Приведение числа к типу "строка" не даст ожидаемого результата. Нули в полученной таким образом строке сами по себе обратно не появятся.
   Multicvet
 
5 - 12.02.20 - 09:17
Сделал так: СтрЗаменить(Строка(Формат(Артикул,"ЧЦ=6; ЧВН=")),Символы.НПП,"")
В моем случае помогло, т.к. у меня всегда артикул 6-ти значный, но как сделать универсально не додумался...
   unregistered
 
6 - 12.02.20 - 09:18
(0) В cfvjv фале в таблице excel укажи принудительно тип значения "текст" в колонке с этим артикулом.
   unregistered
 
7 - 12.02.20 - 09:19
(5) Тебя русским языком попросили показать строку кода, где ты получаешь значение переменной Артикул из excel.
   Multicvet
 
8 - 12.02.20 - 09:20
(6) в каждом файле пользователь будет формат менять, при каждой загрузке?
   Aleksey
 
9 - 12.02.20 - 09:20
(5) либо попроси чтобы при выгрузки впереди символ ' писали
   Aleksey
 
10 - 12.02.20 - 09:22
Самое интересное что новый формат xlsx не страдает излишней добротой и автоматом не меняет строку на числа. Этим грешит старый формат xls

(7) да пофиг, там при открытии ексель преобразовывает строку в число
   Multicvet
 
11 - 12.02.20 - 09:26
(7) СокрЛП(ExcelЛист.Cells(Строка, КолонкаИмени).text)
   ColonelAp4u
 
12 - 12.02.20 - 09:52
(11) в отладчике смотрел что возвращает этот код? Там есть лидирующие 0 или уже тут их отрезало.
   Multicvet
 
13 - 12.02.20 - 10:16
(11) Спасибо!!! Протупил я, кончено. Изменил с ExcelЛист.Cells(Строка, инд).Value на ExcelЛист.Cells(Строка, инд).text и все стало хорошо!
   Multicvet
 
14 - 12.02.20 - 10:22
(12) Ошибся номером поста... Спасибо, конечно, не мне, а ColonelAp4u

Список тем форума
Рекламное место пустует  Рекламное место пустует
Компьютер — устройство разработанное для ускорения и автоматизации человеческих ошибок.
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.