Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ссылки на другие файлы в формуле / 6 сообщений из 6, страница 1 из 1
11.09.2007, 10:42:35
    #34790291
vick057
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки на другие файлы в формуле
Гуру, подскажите направление, в каком двигаться.

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

Не обязательно полный текст программы, можно функции, свойства, методы просто подсказать.
...
Рейтинг: 0 / 0
11.09.2007, 16:11:38
    #34791809
vick057
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки на другие файлы в формуле
По крайней мере, начало положено.
Вот так получается список всех связанных файлов.

Dim iLinks As Variant, i&
iLinks = ActiveWorkbook.LinkSources(xlExcelLinks)
If Not IsEmpty(iLinks) Then
For i = 1 To UBound(iLinks)
MsgBox (iLinks(i))
Next i
End If
End Sub

Теперь только нужно из формулы ячейки вычленять имя файла, искать его в массиве iLinks, открывать, вычленять оттуда же номер ячейки и вставать на нее.

Сейчас нужна подсказка как обрабатывать событие KeyPress.
...
Рейтинг: 0 / 0
11.09.2007, 16:25:58
    #34791888
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки на другие файлы в формуле
Разве из iLinks нельзя узнавать название книги?
KeyPress чего? У листа и книги нет таких событий.
...
Рейтинг: 0 / 0
11.09.2007, 17:06:09
    #34792050
vick057
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки на другие файлы в формуле
В iLinks хранятся все книги, связанные с этим файлом. Мне нужно полное имя только тех, которые есть в ячейке.
...
Рейтинг: 0 / 0
11.09.2007, 17:36:57
    #34792185
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки на другие файлы в формуле
мне видится два способа
1. перебирая iLinks искать в ячейках с помощью find
2. Выделить ячейки с формулами (Selection.SpecialCells(xlCellTypeFormulas, 23)) и бегать по ним
...
Рейтинг: 0 / 0
12.09.2007, 12:15:40
    #34793890
СамБамбук
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ссылки на другие файлы в формуле
Если в ячейках ПРОСТЫЕ формулы (+ или - или * или /), то формулу МОЖНО распотрошить до уровня ЗНАЧЕНИЙ ...
Анализируется КАЖДЫЙ кусок формулы, если в КУСКЕ ссылка на ячейку или лист или книгу - идем туда и СМОТРИМ, является ли ЭТА ячейка ЗНАЧЕНИЕМ или формулой. Подставляем в ПЕРВЫЙ кусок или ФОРМУЛУ или ЗНАЧЕНИЕ и т. д. ....

Муторно ... да ... НО сделать можно ...
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ссылки на другие файлы в формуле / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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