Определить, открыта ли уже книга Excel [закрыта]
В VBA я программно открыл файл MS Excel с именем «myWork.XL».
Теперь мне нужен код, который может сказать мне о его статусе — открыт он или нет. Т.е. что-то вроде IsWorkBookOpened («myWork.XL) ?
Для своих приложений я обычно хочу работать с книгой, а не просто определять, открыта ли она. В этом случае я предпочитаю пропустить Булевой функции и просто вернуть книгу.
в качестве sFileName вы должны указать прямой путь в файл, например:
Что делать, если вы хотите проверить, не создавая еще один экземпляр Excel?
Например, у меня есть макрос Word (который запускается повторно) который должен извлекать данные из электронной таблицы Excel. Если электронная таблица уже открыта в существующем экземпляре Excel, я бы предпочел не создавать новый экземпляр.
Как быстро проверить, находится ли файл (книга) открыт или закрыт в Excel?
Как быстро проверить, есть ли файл (w orkbook) открыт или закрыт в Excel?
Ежедневная работа в Excel, вы одновременно открываете несколько книг для работы, но иногда сотни книг могут запутать вашу голову, чтобы вспомнить, если конкретная книга открыто или закрыто. Откажитесь от традиционного метода проверки файлов по одному, здесь я познакомлю вас с приемами, позволяющими быстро обнаружить, что книга открыта или закрыта.
Проверьте, открыта или закрыта книга с помощью VBA
Проверьте, открыта или закрыта книга, с помощью Kutools for Excel
Проверить, открыта ли книга или закрыто с помощью VBA
Вот код VBA, который вы можете запустить, чтобы проверить, открыта или закрыта конкретная книга.
2. Нажмите Вставить > Module , а затем скопируйте и вставьте VBA в новое окно Module .
VBA: проверьте, открыта или закрыта книга.
3. И нажмите клавишу F5 , чтобы запустить этот vba, и появится диалоговое окно, напоминающее вам, открыта конкретная книга или нет.
Совет: В приведенном выше VBA «объединить» — это имя книги, которое вы хотите проверить, вы можете его по мере необходимости.
Проверьте, открыта или закрыта книга с помощью Kutools for Excel
Если вы не знакомы с VBA, вы можете проверить, открыта ли книга с помощью Kutools for Excel , с его панелью навигации , которая поможет вы можете четко просматривать все открытые книги в списке книг на панели.
После бесплатной установки Kutools for Excel, сделайте следующее:
1. Нажмите Kutools > Навигация , чтобы включить панель навигации. См. Снимок экрана:
2. Затем нажмите кнопку Книга и лист , чтобы развернуть панель и перейти в раздел Книга и лист . И вы можете просмотреть все открытые книги в верхнем списке. См. Снимок экрана:
С панелью навигации , вы также можете быстро переключаться между книгами или листами в списке.
Демо
Лучшие инструменты для повышения производительности офиса
Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%
- Повторное использование : быстро вставьте сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки паролем; Создавайте список рассылки и отправляйте электронные письма …
- Панель супер формул (легко редактировать несколько строк текста и формул); Чтение макета (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон …
- Объединить ячейки/строки/столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки/столбцы … Предотвратить дублирование ячеек; Сравнить диапазоны …
- Выбрать повторяющиеся или уникальные строки; Выберите пустые строки (все ячейки пусты); Супер поиск и нечеткий поиск во многих книгах; Случайный выбор …
- Точное копирование нескольких ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставка маркеров, флажков и прочего …
- Извлечь текст, добавить текст, удалить по положению, удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии …
- Суперфильтр (сохранение и применение схем фильтрации к другим листам); Расширенная сортировка по месяцам/неделям/дням, частоте и другим параметрам; Специальный фильтр жирным шрифтом, курсивом …
- Объединить рабочие книги и рабочие таблицы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF …
Группировка сводной таблицы по номеру недели, дню недели и т. Д.. Показывать разблокированные, заблокированные ячейки разными цветами; Выделите ячейки с формулой/именем … ->
Как с помощью VBA извлекать информацию из Web-страниц | КомпьютерПресс
- Повторное использование : быстро вставьте сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки паролем; Создавайте список рассылки и отправляйте электронные письма …
- Панель супер формул (легко редактировать несколько строк текста и формул); Чтение макета (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон …
- Объединить ячейки/строки/столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки/столбцы … Предотвратить дублирование ячеек; Сравнить диапазоны …
- Выбрать повторяющиеся или уникальные строки; Выберите пустые строки (все ячейки пусты); Супер поиск и нечеткий поиск во многих книгах; Случайный выбор …
- Точное копирование нескольких ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставка маркеров, флажков и прочего …
- Извлечь текст, добавить текст, удалить по положению, удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии …
- Суперфильтр (сохранение и применение схем фильтрации к другим листам); Расширенная сортировка по месяцам/неделям/дням, частоте и другим параметрам; Специальный фильтр жирным шрифтом, курсивом …
- Объединить рабочие книги и рабочие таблицы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF …
2. Потом курсором-крестиком «нарисуем» кнопку в документе и нажмём «Создать» в окне «Назначить макрос объекту», чтобы кнопке была назначена пустая процедура-обработчик её основного события (то есть, нажатия):
Обращение к Internet Explorer
Наша программа на некоторое время зависает т.к. ожидает ответа от сервера, возможно вы не почувствуете этого. Но если Ваш интернет слабый Вы можете долго ожидать ответа до тех пор, пока не вылети таймаут.