Главная страница
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.281 c
2-1271328693
vasya
2010-04-15 14:51
2010.08.27
Создание "компилятора" e-book


2-1274523488
Delphist2
2010-05-22 14:18
2010.08.27
excel


15-1272364526
TUser
2010-04-27 14:35
2010.08.27
Удаление комментариев и лишнего кода


8-1204132089
AntonUSAnoV
2008-02-27 20:08
2010.08.27
Хочу сделать не знаю как ...


2-1265871705
Amir
2010-02-11 10:01
2010.08.27
Не отображаются визуальные компоненты формы