Имя: Пароль:
1C
1С v8
Установить имя области табличного документа
0 sttt
 
25.10.12
00:43
Как установить программно имя области. Пытаюсь установить Область.Имя = "тест" + Область.Имя; не срабатывает, по прежнему старое имя остается.
1 sttt
 
25.10.12
00:49
полностью код:
   СпсиокФайлов = НайтиФайлы(Объект.ПапкаДляВыгрузки, "*.mxl", Ложь);

   ТД = Новый ТабличныйДокумент;
   
   Для каждого ФайлМакета Из СпсиокФайлов Цикл
       
       ТД.Очистить();
       ТД.Прочитать(ФайлМакета.ПолноеИмя);
       
       Для Каждого Область Из ТД.Области Цикл
           Область.Имя = "стр" + Сред(Область.Имя, 4);
       КонецЦикла;
       
       ТД.Записать(ФайлМакета.Путь + "new\" + ФайлМакета.Имя,);
       
   КонецЦикла;
2 sttt
 
25.10.12
01:44
в СП так исписано:

ОбластьЯчеекТабличногоДокумента (SpreadsheetDocumentRange)
Имя (Name)
Использование:

Чтение и запись.
Описание:

Тип: Строка.
Содержит имя области.

Доступность:

Тонкий клиент, веб-клиент, сервер, толстый клиент, внешнее соединение.
3 НЕА123
 
25.10.12
07:37
отладчик
?
4 sttt
 
25.10.12
10:52
(3) отладчик тож самое кажет. это баг в сп или платформе... про себя ниче не скажу)))
5 sttt
 
25.10.12
10:54
все отрабатывает без ошибок, но и не меняем ранее заданное вручную имя области
6 НЕА123
 
25.10.12
14:49
СпсиокФайлов = НайтиФайлы(Объект.ПапкаДляВыгрузки, "*.mxl", Ложь);

   ТД = Новый ТабличныйДокумент;
   массив = Новый массив;
   Для каждого ФайлМакета Из СпсиокФайлов Цикл
       

       ТД.Очистить();
       ТД.Прочитать(ФайлМакета.ПолноеИмя);
       
       Для Каждого Область Из ТД.Области Цикл
           Массив.Добавить(Область);
       КонецЦикла;
       Для Каждого Эл Из Массив Цикл
           Эл.Имя = "стр" + Сред(Эл.Имя, 4);
       КонецЦикла;


       
       ТД.Записать(ФайлМакета.Путь + "new\" + ФайлМакета.Имя,);
       
   КонецЦикла;
7 НЕА123
 
25.10.12
14:49
пинание по колесам, но попробовать...
8 sttt
 
29.10.12
03:30
(7) не помогло)) похоже баг