powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Вопрос про связь Excel и Foxpro
5 сообщений из 5, страница 1 из 1
Вопрос про связь Excel и Foxpro
    #36083332
UnderFade
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Доброе время суток.
Созрел такой вопрос: в программе я открываю Excel-документ, в котором необходимо просмотреть есть ли в конкретной ячейке информация, если есть, то сохранить ее в переменную, иначе сохранить значение соседней ячейки. Как мне проверить ячейку на отсутствие в ней информации? По MessageBox() к пустой ячейке её Value возвращается как .NULL. Какое равенство в IF мне необходимо задать для выполнения вышеописанной задачи?

Спасибо :)
...
Рейтинг: 0 / 0
Вопрос про связь Excel и Foxpro
    #36083549
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
UnderFadeДоброе время суток.
Созрел такой вопрос: в программе я открываю Excel-документ, в котором необходимо просмотреть есть ли в конкретной ячейке информация, если есть, то сохранить ее в переменную, иначе сохранить значение соседней ячейки. Как мне проверить ячейку на отсутствие в ней информации? По MessageBox() к пустой ячейке её Value возвращается как .NULL. Какое равенство в IF мне необходимо задать для выполнения вышеописанной задачи?

Спасибо :)
А фоксовская ISNULL() для чего?
Или, раз уж Эксель открыт, функционал самого Экселя использовать.
...
Рейтинг: 0 / 0
Вопрос про связь Excel и Foxpro
    #36083559
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
LOCAL loExcel as Excel.Application 
loExcel=CREATEOBJECT('Excel.Application')
LOCAL loBook as Excel.Application 
loBook=loExcel.Application.Workbooks.Open(FULLPATH('myExelFile.xls'))
loSheet = m.loBook.Sheets( 1 ) 
****
lValue=cast(m.loSheet.cells( 1 ,  1 ).value as varchar( 50 ))
messagebox("В экселе, в ячейке 1.1 написано: '+lValue+chr(13)+'Проверим :-)")
loExcel.Visible= .T.
...
Рейтинг: 0 / 0
Вопрос про связь Excel и Foxpro
    #36083564
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
messagebox("В экселе, в ячейке 1.1 написано: '+lValue+chr(13)+'Проверим :-)")*
messagebox("В экселе, в ячейке 1.1 написано: "+lValue+chr(13)+"Проверим :-)")
...
Рейтинг: 0 / 0
Вопрос про связь Excel и Foxpro
    #36108476
UnderFade
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Всем сапасибо за помощь!)

Просто, не так хорошо знаю фокс и не все его функции. IsNull() подошло идеально :)
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Вопрос про связь Excel и Foxpro
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]