|
OpenOffice
| ☑ |
0
ВежливаяТварь
14.02.13
✎
11:23
|
Добрый день. Столкнулся с весьма затруднительной проблемой. Переделываю одну обработку, написанную под работу с Excell, под работу с OpenOffice.
Вроде бы все переделал, только несколько строчек ни как не могу переделать. Не могли бы вы подсказать где можно прочитать что то что помогло бы. Код:
Книга.Worksheets(Лист).Rows(НомСтр).Select(); //выделение строки
Приложение.Selection.insert(); //вставка новой строки перед выделенной
Книга.Worksheets(Лист).Rows(НомСтр+1).Select();//выделение строки
Приложение.Application.CutCopyMode = 0;
Приложение.Selection.Copy(); //копирование области
Книга.Worksheets(Лист).Rows(НомСтр).Select(); //выделение строки
Приложение.ActiveSheet.Paste(); //вставить область
|
|
1
Nefrit88
14.02.13
✎
11:34
|
не обязательно так изголяться и переписывать код. Есть библиотека которая позволяет работать в опен офисе,а 1с будет думать что это эксель.
|
|
2
ВежливаяТварь
14.02.13
✎
11:47
|
(1) Да не хотелось бы устанавливать дополнительные библиотекию
|
|
3
ВежливаяТварь
14.02.13
✎
11:52
|
(1) а что за библиотека
|
|
4
Filippov
14.02.13
✎
13:37
|
(3) Библиотека стандартных подсистем SSL. Подсистема Печать (для MS Word и OO Writer). В демо SSL есть примеры использования
|
|
5
ВежливаяТварь
14.02.13
✎
14:31
|
Попробую с библиотекой. Спасибо)
Получилось скопировать, может кому-нибудь пригодится
Лист.getRows().insertByIndex(НомСтр, 1); //вставка новой строки перед выделенной
RangeAddress = Лист.GetCellRangeByPosition(1,НомСтр,100,НомСтр).GetRangeAddress();//выделение строки
CellAddress = Лист.GetCellByPosition(1,НомСтр-1).GetCellAddress(); //выделение области куда вставлять
Лист.copyRange(CellAddress, RangeAddress); //копировать
|
|