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

Вниз

Excel. Exception: заполнение и выделение   Найти похожие ветки 

 
DevilDevil ©   (2007-06-21 18:27) [0]

Периодически обновляю лист Excel-я следующим образом:


var
 R : variant;
begin
 App.EnableEvents := false;
 R := GetRange;
 R.Value := DataArray;
 App.EnableEvents := true;
 R := UnAssigned;
end;


Однако, если в этот момент в Excel-e выделить какую-то область, то возникает Exception.

Как избежать этой и подобных неприятных ситуаций ?

Заранее благодарен


 
Сергей М. ©   (2007-06-22 08:40) [1]

Что такое GetRange, как он связан с текущим выделением ?


 
DevilDevil ©   (2007-06-22 10:49) [2]

> Сергей М. ©   (22.06.07 08:40) [1]

есть там некоторые внутренние данные...

В общем я заполняю определённую область в таблице. GetRange возвращает эту область (Range), имея размеры моей области. DataArray содержит данные, которые надо в эту область занести.

Моя область никак не связана с выделенной областью


 
Сергей М. ©   (2007-06-22 11:05) [3]


> возникает Exception


Какое конкретно ?


 
DevilDevil ©   (2007-06-22 15:52) [4]

> Сергей М. ©   (22.06.07 11:05) [3]

EOleException with message "OLE error 80AC472"

возникает если в момент BeginUpdate() пользователь (я) выделял группу ячеек

procedure TExcelUtil.BeginUpdate();
{var
 ErrCheck : variant;}

begin
 App.UserControl  := false;
 App.Interactive  := false;
 App.EnableEvents := false;

 App.ScreenUpdating := false;
 App.Calculation := xlCalculationManual;

 {ErrCheck := App.ErrorCheckingOptions;
 ErrCheck.BackgroundChecking := false;
 ErrCheck.NumberAsText := false;
 ErrCheck.InconsistentFormula := false;

 FreeVariant(ErrCheck);}

end;



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

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

Наверх




Память: 0.47 MB
Время: 0.379 c
2-1186490490
1c_user
2007-08-07 16:41
2007.09.02
ГдЕ оШиБкА??, если она есть вообще...


11-1168775119
Psychedelic
2007-01-14 14:45
2007.09.02
Как отличать друг от друга компоненты


2-1186325797
Roun
2007-08-05 18:56
2007.09.02
как за-ZIP-овать несколько файлов в один архив?


15-1186427988
Kostafey
2007-08-06 23:19
2007.09.02
Установка кодировки


15-1186502485
Ivolg
2007-08-07 20:01
2007.09.02
Превести c C в Delphi