Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.071 c
2-1267322500
RWolf
2010-02-28 05:01
2010.08.27
TControlBar: как запретить вертикальное перемещение тулбаров


15-1270742112
denis_stell
2010-04-08 19:55
2010.08.27
количество дней


2-1271858675
DROWSY
2010-04-21 18:04
2010.08.27
Компонент для выбора числового значения.


4-1234276707
Serafim
2009-02-10 17:38
2010.08.27
Не получается записать во входной буфер консоли WriteConsoleInput


2-1269823057
Вася
2010-03-29 04:37
2010.08.27
Свой обработчик для динамически созданного компонента





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский