Перенос данных из закрытой таблице (макрос)

[Loshara]

Уважаемые участники форума!
На удаленном компьютере в расшаренной папке находиться 3 таблицы скажем (P_t.xls, P_s.xls, _P_R.xls) которые обновляются каждый час. Необходимо сохранить данные в массиве (2 и 3 столбец, количество записей <40) для дальнейшей обработке не открывая названные таблицу.
Вопрос простой но я не нашел была ли такая тема. Если была подскажите ссылку

[R71MT]

..прочитать файл, не открыв его??? Эт что-то новенькое..

[Loshara]

Именно не открывая. И здесь ничего новенького нет. Мне кажется такое можно сделать с помощью ADODB, но как не "?"

[Казанский]

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

[Loshara]

Сообщение от Казанский

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

К сожалению я не нашел примеры. Хотя добросовестно перерыл на данном форуме (как мне казалось) все.
И если возможно укажете где пример открытие файла Read-only макросом.

[Казанский]

Сообщение от Loshara

К сожалению я не нашел примеры

Да ну? В шапке страницы слово "Поиск", клик - adodb - и вот например
http://programmersforum.ru/showpost....6&postcount=10

Сообщение от Loshara

И если возможно укажете где пример открытие файла Read-only макросом.

Спросите у своего Excel'я
Включите запись макроса, Ctrl+O, выберите файл, в выпадающей кнопке Открыть выберите "Открыть для чтения", ОК. Остановите запись и посмотрите, что получится.

[Loshara]

Сообщение от Казанский

Да ну? В шапке страницы слово "Поиск", клик - adodb - и вот например
http://programmersforum.ru/showpost....6&postcount=10
Спросите у своего Excel'я
Включите запись макроса, Ctrl+O, выберите файл, в выпадающей кнопке Открыть выберите "Открыть для чтения", ОК. Остановите запись и посмотрите, что получится.

То что нужно.
А что касается рекодера в 13 он у меня как-то хр***во работает

[diop]

Сообщение от Loshara

Уважаемые участники форума!
На удаленном компьютере в расшаренной папке находиться 3 таблицы скажем (P_t.xls, P_s.xls, _P_R.xls) которые обновляются каждый час. Необходимо сохранить данные в массиве (2 и 3 столбец, количество записей <40) для дальнейшей обработке не открывая названные таблицу.
Вопрос простой но я не нашел была ли такая тема. Если была подскажите ссылку

что-то типа того
использовать такое обращение к файлу
f = Path & file
[G9:BA58].Value = GetObject(f).Worksheets("list1").[G9:BA58].Value
GetObject(f).Close False

[Hugo121]

А как-же в случае readonly сделать перенос? Или значение слова "перенос" за последние годы изменилось?
Хотя помню недавно его применяли по назначению один раз...

Вообще-то формулы отлично отображают значения из другого закрытого файла.

[Djeki]

Если название листов во всех закрытых книгах одинаковое или лист в книге один (тогда лист может называться по разному), и известны адреса ячеек из которых надо взять данные не открывая файл - то можно..Книгу Main.xls откройте, кнопку нажмите и из папки Base берём данные , не открывая файлы