Показать сообщение отдельно
  #6  
Старый 09.12.2011, 06:50
Аватар для Ildar-tsr
Ildar-tsr Ildar-tsr вне форума
Местный
 
Регистрация: 09.08.2011
Адрес: г.Сургут, ХМАО
Сообщения: 453
Репутация: 7402
По умолчанию

Прошу прощения, не метод Workbooks, а метод Windows:
Код:
//Поместим в лэйбл3 текст из А1 первой книги, а в лэйбл4 из второй
xls1.Windows[1].Activate;
Label3.Caption:= xls1.Range['A1'].Value; //небольшой комментарий: Value не обязательно указывать, это просто у меня привычка после VBA
xls1.Windows[2].Activate;                   //на мой взгляд, более правильно обращаться к ячейкам не range, а cells: xls1.Cells[1,1].Value (A1)
Label4.Caption:= xls1.Range['A1'].Value;  //где первый индекс - индекс строки, а второй - индекс столбца, т.е. xls1.Cells[4,2] - B4
Если боишься запутаться в индексах открытых книг, можно "переключаться" следующим образом:
Код:
xls1.Windows[Label1.Caption].Activate;
__________________
Google в помощь
Ответить с цитированием