добавить строку в Excel

← →
xman © (2005-04-12 13:41) [0]

использую..uses comobj; var sheet,xlapp:variant; // OleExcel pathxls:string; //path to file xls Shablon:OleVariant; xlapp:=CreateOleObject("Excel.Application"); XlApp.workbooks.Add(pathxls); XlApp.Visible:=true; sheet:=XLApp.Workbooks[1].WorkSheets["книга"]; Sheet.Cells[2,5]:=Edit1.Text; .. вставка данных из едит в ячейку екселя

ВОПРОС: как мне добавить строку(может правильней сказать ВСТАВИТЬ строку)
у меня есть табличная часть которыая может быть с не определенным количеством строк.
например
1. товар. цена.
2. товар2. цена2.
...
ИТОГ: 12324
как мне добавлять строку перед ИТОГОМ ?

← →
xman © (2005-04-12 14:07) [1]

в Excel`е это называется "добавить ячейки"

← →
YurikGL © (2005-04-12 15:44) [2]

Сделай макрос, который выполняет нужное действие и посмотри, как он устроен

← →
xman © (2005-04-12 15:50) [3]

>YurikGL ©
А где можно посмотрть что выполняет макрос?

← →
xman © (2005-04-12 15:54) [4]

ActiveWindow.SmallScroll Down:=9
Range("A25:A41,30:30").Select
Sheets("íàêëàäíàÿ").Select
ActiveWindow.SmallScroll Down:=6
Rows("18:18").Select
Selection.Insert Shift:=xlDown
вот что мне показал макрос.....
и что мне теперь с ним делать....
неужели нема комманды типа...sheet.insert или add
помогите....очень надо

← →
xman © (2005-04-12 16:10) [5]

я тут коече нашел в инете...но почему у меня делфя(7) непонимает
sheet.Cells.Insert(xlShiftDown); ?

← →
YurikGL © (2005-04-12 16:19) [6]

xman ©

Подозреваю, что сработает примерно так

sheet.Rows("1:1").Select;
XlApp.selection.insert;

Кроме того, покидай на форму TExcelApplication, ExcelWorkSheet и подобные компоненты на форму, далее в любом операторе набираем WordApplication1., нажимаем ctrl+пробел и внимательно читаем. Смысл доступных функций и свойств обычно понятен интуитивно.

http://www.delphimaster.ru/cgi-bin/anketa.pl?id=1084962208

← →
xman © (2005-04-12 16:23) [7]

>YurikGL ©
тут тоже бок..после точки нехотит выпадать меню...я помню когда писал давно тоже с ексзелем так тогда выпадало менюха с методами

Попробуй

Xlapp.selection.EntireRow.Insert;

народ, а че нужно сделать что бы строка добавлялась в другой книге.т.е. в не активной?

ПОЛУЧИЛОСЬ...нашел на ощуп...:)
sheet:=XLApp.Workbooks[1].WorkSheets["имя книги"];
sheet.rows[2].insert;

добавить строку в Excel Найти похожие ветки