|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
02.06.2010, 12:40 | #61 |
Пользователь
Регистрация: 07.06.2009
Сообщений: 29
|
а возможно ли убрать абсолютные названия файлов?
к примеру открыты только 2 документа и ничего более, чтоб он сам определил с каким файлом сравнивать? =)) |
02.06.2010, 14:49 | #62 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Вместо абсолютной ссылки на книгу используйте эту функцию:
http://excelvba.ru/code/GetAnotherWorkbook |
02.06.2010, 15:10 | #63 |
Участник клуба
Регистрация: 17.07.2009
Сообщений: 1,088
|
Игорь, я бы посоветовал чуть подработать код(точнее его часть - ту, что за занесение книг в коллекцию отвечает)
Вместо: Код:
Код:
WebMoney - R298726502453; Яндекс.Деньги - 41001332272872
www.excel-vba.ru Последний раз редактировалось The_Prist; 03.06.2010 в 13:36. |
02.06.2010, 15:17 | #64 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Спасибо, Дима, исправил.
Да я этот код только что написал за несколько минут - для одного проекта понадобился. А тут как раз просили что-то подобное. Там ещё очень много дорабатывать, если делать по-человечески... |
02.06.2010, 15:18 | #65 |
Участник клуба
Регистрация: 17.07.2009
Сообщений: 1,088
|
Исправь еще, ориентируясь на код выше. Я его тоже поправил.
WebMoney - R298726502453; Яндекс.Деньги - 41001332272872
www.excel-vba.ru |
02.06.2010, 15:38 | #66 |
Пользователь
Регистрация: 07.06.2009
Сообщений: 29
|
а как его внедрить в ваш макрос?
я в этом не бумбум, буду признателен если поможете. было бы круто еслиб код определял и основную книгу и с которой сравнивать надо |
03.06.2010, 05:00 | #67 |
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
Не совсем понимаю, зачем создавать коллекцию? По-моему, вполне достаточно имеющейся коллекции Workbooks.
Автор вопроса хочет сравнивать 2 файла при условии, что один из них - это файл с макросом, а другой - это еще один открытый файл с неизвестным именем. Т.е. открыты только эти 2 файла. Иначе, т.к. мы не знаем имени файла для сравнения, то каким образом его определять? Если все правильно, то задачу можно решить, например, так: Код:
Чем шире угол зрения, тем он тупее.
|
03.06.2010, 06:00 | #68 |
Пользователь
Регистрация: 07.06.2009
Сообщений: 29
|
спасибо! ну а всетаки можно сделать с окошком выбора документов?? этот макрос для шефа, у него постоянно открыто много книг Excel..будет не удобно очень.заранее благодарю!
|
03.06.2010, 07:14 | #69 |
Пользователь
Регистрация: 07.06.2009
Сообщений: 29
|
мистика.пробовал дома этот макрос все работало, на работе пробую, ниче не работает, постоянно пишет что должно быть открыто 2 книги, хотя помимо этих двух ничего не открыто.
|
03.06.2010, 08:46 | #70 | |
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
Цитата:
Посмотрите вложение. Откройте файл "Книга1.xlsm" и запустите макрос "Main". P.S. Перед открытием выбранного файла можно добавить требуемые проверки.
Чем шире угол зрения, тем он тупее.
|
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Прибавление данніх из двух столбцов | gavrylyuk | Microsoft Office Excel | 3 | 01.08.2008 11:40 |
Нахождение совпадений в двух книгах | Professor Hubert | Microsoft Office Excel | 5 | 25.07.2008 12:59 |
Отображение в форме и таблице двух столбцов подстановок | smoky | Microsoft Office Access | 5 | 01.07.2008 09:27 |
Сравнение двух списков | lelik759 | Microsoft Office Excel | 7 | 13.04.2008 22:19 |
Как извлечь из двух столбцов несовпадающие строки | Shavminator | Microsoft Office Excel | 4 | 28.12.2007 12:23 |