Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 16.10.2008, 12:08   #11
KozakMamaj
 
Регистрация: 15.10.2008
Сообщений: 8
По умолчанию

Цитата:
Сообщение от SAS888 Посмотреть сообщение
Какую из "кучи" книг выбирать? Есть критерии?
Параметр в функцию передается в виде 'C:\MyDoc\[book1.xls]sheet1!'B3
но не ссылкой, а текстовой строкой.
KozakMamaj вне форума
Старый 16.10.2008, 12:38   #12
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Так ведь это же и есть то, что надо.
Создайте и используйте функцию, аргумент которой - текстовая строка в виде: 'C:\MyDoc\[book1.xls]sheet1!'B3
Код:
Function GetValue(x As String)
    GetValue = x
End Function
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 16.10.2008, 13:12   #13
KozakMamaj
 
Регистрация: 15.10.2008
Сообщений: 8
По умолчанию

Цитата:
Сообщение от SAS888 Посмотреть сообщение
Так ведь это же и есть то, что надо.
Создайте и используйте функцию, аргумент которой - текстовая строка в виде: 'C:\MyDoc\[book1.xls]sheet1!'B3
Код:
Function GetValue(x As String)
    GetValue = x
End Function
В дальнейшем потребуется чтобы функция выдавала сумму двух ячеек из закрытой книги, как тогда?
KozakMamaj вне форума
Старый 16.10.2008, 13:32   #14
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Например, так:
Код:
Function GetValue(x As String, y As String)
    GetValue = Evaluate(x & "+" & y)
End Function
Где параметры x и y - строковые переменные в том же виде.
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 16.10.2008, 18:21   #15
KozakMamaj
 
Регистрация: 15.10.2008
Сообщений: 8
По умолчанию

Цитата:
Сообщение от SAS888 Посмотреть сообщение
Например, так:
Код:
Function GetValue(x As String, y As String)
    GetValue = Evaluate(x & "+" & y)
End Function
Где параметры x и y - строковые переменные в том же виде.
К сожалению эта функция работает только с открытыми книгами. С закрытой выдает вместо значения #ССЫЛКА!.
KozakMamaj вне форума
Старый 17.10.2008, 06:02   #16
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Не совсем так.
Попробуйте создать файл с данными, сохранить его по произвольному пути и закрыть. После этого, откройте файл с предложенной функцией и введите параметры функции с указанием пути, имени файла, листа и адреса ячеек в текстовом виде (т.е. так, как Вы писали).
В таком виде все будет работать до тех пор, пока одна из книг (рабочая, или с данными) не будет перемещена в другую директорию. После перемещения, при запросе на обновление связей необходимо будет изменить и обновить связи, указав новый путь. Т.е. точно так же, как и при наличии в ячейке ссылки на закрытую книгу, которая была перемещена.

P.S. На всякий случай, я проверил это. Работает так, как я написал. Если e Вас не получится - прикреплю файлы для примера.
P.P.S. В коде я не контролирую возможные ошибки (тип данных в ячейке по ссылке и т.п.). Если нужно - сделайте сами.
Чем шире угол зрения, тем он тупее.

Последний раз редактировалось SAS888; 17.10.2008 в 06:08. Причина: Добавлено
SAS888 вне форума
Старый 17.10.2008, 11:28   #17
KozakMamaj
 
Регистрация: 15.10.2008
Сообщений: 8
По умолчанию

Цитата:
Сообщение от SAS888 Посмотреть сообщение

P.S. На всякий случай, я проверил это. Работает так, как я написал. Если e Вас не получится - прикреплю файлы для примера.
Если вас не затруднит. Поскольку у меня чегото неполучаеться.
KozakMamaj вне форума
Старый 21.10.2008, 16:58   #18
KozakMamaj
 
Регистрация: 15.10.2008
Сообщений: 8
По умолчанию

Цитата:
Сообщение от SAS888 Посмотреть сообщение
Не совсем так.
Точно так. С открытым файлом работает без проблем, с закрытым выдает ошибку.
KozakMamaj вне форума
Старый 22.10.2008, 06:55   #19
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Вообще, Ваша проблема легко решается с помощью макроса. Может быть отказаться от функции и запускать макрос, например, при изменении значения в интересующей ячейке (ячейках)? Откуда берутся параметры для функции? Вводятся вручную, или кто-то их передает?
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц

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

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Получение/Отправка данных в интернет sklazer Работа с сетью в Delphi 13 11.01.2009 16:26
Получение типа данных Proof БД в Delphi 2 14.05.2008 20:38
Получение данных из blob поля vvviperrr БД в Delphi 1 28.04.2008 00:05
Получение данных от php скрипта.. Sanich Работа с сетью в Delphi 5 20.12.2007 16:41
форма отправки данных с функцией прикрепления файлов zetrix PHP 0 29.10.2006 20:24