Показать сообщение отдельно
  #4  
Старый 14.10.2011, 17:22
Аватар для fofka
fofka fofka вне форума
Начинающий
 
Регистрация: 12.10.2008
Сообщения: 163
Репутация: -1588
По умолчанию Нашлась ошибка!

Все дело в том, что у меня загружается шаблон ( из Excel). Лишние листы если не используются, удаляются. При этом меняется активный лист, и в этом ошибка.
Добавил одну строку, и все заработало.
PHP код:
var 
  
sh :TCaption
   
 
begin 
sh 
:= Form6.ComboBox36.Text;

Ex.ActiveWorkBook.WorkSheets[1].Select;///Делаем активным лист и ошибка пропадает.

 
Ex.ActiveWorkBook.WorkSheets[L1].Range['B22:B39'].Select
  
Ex.Selection.Font.Size:=sh;///---Размер шрифта 
 
begin 
  
for i:=0 to Memo1.Lines.Count-do 
 
begin 
  Ex
.ActiveWorkBook.WorkSheets[L1].Cells[i+222].value:= memo1.Lines[i]; 
end
Так что тема закрыта.
Ответить с цитированием