Показать сообщение отдельно
  #5  
Старый 27.12.2009, 00:46
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,721
Репутация: 52347
По умолчанию

Нет не Find, а просто значение ячейки по конкретному адресу проверяйте.
Примерно так:
Код:
if Pos('Петя',WorkSheet.Range['A1']) <> 0 then ListBox1.Items.Add(WorkSheet.Range['A1'])
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием