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

Delphi Sources



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

 
 
Опции темы Поиск в этой теме Опции просмотра
  #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
Так что тема закрыта.
Ответить с цитированием
 


Delphi Sources

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

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

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

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


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


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

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