Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

method insert класса range завершен неверно   Найти похожие ветки 

 
Delphist2   (2010-05-22 16:12) [0]

Пытаюсь вставить строку в excele, как здесь: http://programmersforum.ru/showthread.php?t=64416
Вылетает исключение. Что посоветуете?


 
Delphist2   (2010-05-22 16:13) [1]

исключение в строке
XLApp.Selection.Insert("xlDown");


 
Delphist2   (2010-05-22 16:25) [2]

А если так делать
sheet.Range[i+29,j].EntireRow.Insert("xlDown",EmptyParam);
то OLE error 800A03EC


 
Anatoly Podgoretsky ©   (2010-05-22 16:42) [3]

> Delphist2  (22.05.2010 16:12:00)  [0]

А зачем нам куда то лезть?


 
Delphist2   (2010-05-22 16:54) [4]

Вот выкладываю тогда:
var
 XLApp, WSh, Rng : Variant;
 ...
 WSh := XLApp.WorkBooks[1].WorkSheets[Sheet];
 WSh.Select; //выбранный лист
 //вставка строки (здесь одной) в позицию <Row> и копирование форматов ячеек
 Rng := WSh.Rows[Row];
 Rng.Select;
 //вставка строки; новая строка внизу (Row+1)
 XLApp.Selection.Insert("xlDown");
 //копирование формата с ячеек существующей строки на ячейки добавленной
 Rng := WSh.Rows[Row+1];
 Rng.Select;
 XLApp.Selection.Copy;
 Rng := WSh.Rows[Row];
 Rng.Select;
 XLApp.Selection.PasteSpecial("xlPasteFormats", "xlNone", False, False);
 XLApp.CutCopyMode := False;



Страницы: 1 вся ветка

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.05 c
15-1271142494
brother
2010-04-13 11:08
2010.08.27
Полицейским камерам угрожает взлом через номер автомобиля


15-1272036312
@!!ex
2010-04-23 19:25
2010.08.27
Как получить повышенные привилегии в Vista?


2-1272377517
inplicit_none
2010-04-27 18:11
2010.08.27
выделение компонентов на форме


15-1265999141
OneYoungMan
2010-02-12 21:25
2010.08.27
Linux для старого компьютера...


15-1265220583
vuk
2010-02-03 21:09
2010.08.27
От так от...