Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Corba";
Текущий архив: 2006.02.05;
Скачать: [xml.tar.bz2];

Вниз

Поиск в Word e   Найти похожие ветки 

 
eugene32   (2005-04-07 16:40) [0]

помогите плиз.
Хочу найти ячейку содержащую целое (например 240).
Пишу:

ThisCell := Excel.Sheets[1].Columns[ColNo].Find("240");


Результат:
Найдена первая ячейка, содержащая 240 - 19240.
А нужна ячейка содержащая именно 240.

В Word"е при поиске это исправляется Поиск - Параметры - Ячейка целиком. Но как это сделать в программе?

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


 
eugene32   (2005-04-07 16:52) [1]

Блин, всё перепутал. Не в word"e а в Excele!


 
YurikGL ©   (2005-04-07 17:43) [2]

попробуй что-нибудь типа

vr:OleVariant;

vr:=xlWhole;

Find("123",emptyparam,emptyparam,vr);


 
eugene32   (2005-04-07 20:05) [3]

Спасибо, это верно! :)

var
ThisCell: variant;
...

ThisCell := Excel.Sheets[1].Columns[ColNo].Find("240");


Возник ещё 1 вопрос: как проверить правильность ThisCel, то есть проверить нашлось что-нибудь или нет?


 
AloneAli ©   (2005-04-08 09:38) [4]

А это не пробовал смотреть?

http://www.delphikingdom.com/asp/viewitem.asp?catalogid=272



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

Форум: "Corba";
Текущий архив: 2006.02.05;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.013 c
15-1137352844
AlterEgo of WondeRu
2006-01-15 22:20
2006.02.05
Путин и Иисус!


2-1137488065
rerbi
2006-01-17 11:54
2006.02.05
как добавить символ в строку


2-1137836536
Clock
2006-01-21 12:42
2006.02.05
Часы


15-1137169687
Spectre_s
2006-01-13 19:28
2006.02.05
Декомпилятор для Delphi


15-1136978114
syte_ser78
2006-01-11 14:15
2006.02.05
винт с 16Мб кеша





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский