Имя: Пароль:
1C
1С v8
Выгрузка данных в XLS
,
0 Sun125
 
01.06.15
08:34
Нужно выгрузкить данные из 1С в формате XLS, а именно ИНН сотрудника, поле строкового типа.
В итоге выгружается вот такое значение: 1,20704E+11.
Нажимаю 2 раза на ячейку, вижу ИНН. Подскажите,пожалуйста, как сразу выгрузить в нужном формате?
1 ДенисЧ
 
01.06.15
08:34
А как выгружаешь?
2 Sun125
 
01.06.15
08:35
(1)Лист.Cells(НомерСтроки, 15).Value = ТекСтрока.ИНН;
3 Sun125
 
01.06.15
08:35
ТекСтрока.ИНН - тип строка в 1С
4 ДенисЧ
 
01.06.15
08:35
Попробуй не Value, а Text
5 France
 
01.06.15
08:37
Ставить впереди апостроф '
6 Рэйв
 
01.06.15
08:39
Columns("D:D").Select
    Selection.NumberFormat = "@"
7 Sun125
 
01.06.15
08:40
(4) {Форма.Форма.Форма(329)}: Поле объекта недоступно для записи (Text)
8 France
 
01.06.15
08:44
Что дурью маешься. В 6 после = + "'"+
9 Sun125
 
01.06.15
08:45
(6) {Форма.Форма.Форма(329)}: Поле объекта не обнаружено (SelectSelection)
10 Рэйв
 
01.06.15
08:47
(9)Я просто код с макроса тебе дал. Надеялся, что уж к 1С сам приспособишь. Видимо зря надеялся:-)
11 France
 
01.06.15
08:48
До 100 дойдет?
12 Рэйв
 
01.06.15
08:48
(11)Имеет все шансы:-)
13 France
 
01.06.15
08:49
(10) сам пробовал?
14 Рэйв
 
01.06.15
08:49
(13)Конечно пробовал. В свое время при выгрузке тоже приходилось колонку к тексту приводить.
15 France
 
01.06.15
08:50
(12) я в свое время помучался. В том числе и с макросами)) результат мучений автору не нравиться))
16 Sun125
 
01.06.15
08:53
(10) с макросами просто не имел дело при выгрузке/загрузке
17 Zhuravlik
 
01.06.15
08:56
А интересно: если таб. док. в 8.3.6 научился штатно читать xls, то наверно и сохранять умеет?..
18 France
 
01.06.15
08:58
(1) +, действительно - как выгружаешь? Сохранить как или программно?
19 Zhuravlik
 
01.06.15
08:58
(0) Вы же средствами Excell.Application выгружаете? А если просто в табличный документ, и записать?
-
ТипФайлаТабличногоДокумента (SpreadsheetDocumentFileType)
Значения
...

XLS (XLS)
XLS95 (XLS95)
XLS97 (XLS97)
XLSX (XLSX)
20 Sun125
 
01.06.15
09:01
(18)(19) сохраняю вот так:
РабочаяКнига.SaveAs(ИмяКаталогаВыгрузки+"Файл.xls")
21 France
 
01.06.15
09:06
Ну, еще раз предлагать 8 не рискну - жду 100.
22 Sun125
 
01.06.15
11:26
Решил сохранять по-другому, через табличный документ:
    ИмяФайлаВыгрузки = ИмяКаталогаВыгрузки + "\SB.xls";
    ТипФайлаСохранения = ТипФайлаТабличногоДокумента.XLS97;
Теперь проблема в том, что есть поля типа даты, а они теперь выгружаются как строка.
Свойства ячейки с флажком "Содержит значение" и типом ДАТА не помогает.
23 Sun125
 
01.06.15
11:54
(21) а что, без макросов никак не обойтись?
24 France
 
01.06.15
12:04
(23) обойтись. И я уже написал как, если файл заполняется программно. Даже трижды.
25 France
 
01.06.15
12:06
Лист.Cells(НомерСтроки, 15).Value = "'"+ ТекСтрока.ИНН;
26 Sun125
 
01.06.15
12:07
(25) не помогает такое
27 antotti
 
01.06.15
12:08
Лист.Cells(НомерСтроки, Колонка).NumberFormat = "@";  
Это установка строкового формата будет
28 Sun125
 
01.06.15
12:09
(27)О,помогло! Спасибо!!!
29 France
 
01.06.15
12:10
(26) попробуй апостроф, что на клавише 1.
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс