Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Технологии
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 17.11.2012, 22:28
одинадцатый одинадцатый вне форума
Новичок
 
Регистрация: 16.04.2009
Сообщения: 95
Репутация: 10
По умолчанию Несколько вопросов про Excel

Здравствуйте.
Надо: найти конкретный комментарий в открытой книге. Я думал это осуществить простым перебором ячеек используемого диапазона, но что то не пошло...
Пробовал вот так:
Код:
  
    exApp:=GetActiveOleObject('excel.application');
    ExBook := exApp.WorkBooks.Open(FileName:=StrFileName);
    ExSheet := ExBook.ActiveSheet;
    ExURng := ExSheet.UsedRange;
    R := ExURng;
    R := ExSheet.Range['A1', EmptyParam].SpecialCells(xlCellTypeLastCell, EmptyParam);
endRow:=r.row;
endCol:=r.col;
но так конечно not supported by automation object...

Есть вариант через
Sheet.Cells.SpecialCells(xlCellTypeLastCell, EmptyParam).Activate;
а потом уже
x := XLApp.ActiveCell.Row;
y := XLApp.ActiveCell.Column;
но мне не нравится идея активации какой-то ячейки.

Вопрос №2:
Как определить выделенную область в Excel в OleContainer, а главное адреса первой и последней ячейки этой области? В формате A1

Вопрос№3:
При открытии файла так:
OleContainer1.CreateObjectFromFile(ExtractFilePath (Application.ExeName)+'ППР_6.xlt', false);
Основное меню Excel становится неактивным. Ладно там Создать, Открыть, но кнопка Сохранить тоже не работает(
Как быть?

Помогите пожалуйста хоть с чем-нибудь.
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 21:39.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter