Как проверить, открыто ли определенное окно (файл)

@IvanOK · Регистрация: 25.06.2011

Студворк — интернет-сервис помощи студентам

как прорверить открыто окно(файл) или нет... если да то... если нет то....
зарание благодарен

@аналитика · 15.05.2012, 14:07

Visual Basic
1
2
3
4
5
6
7
on error resume next
set wb=workbooks("файл.xls")
if wb is nothing then
   ' не открыто
else
   ' открыто
end if

@Апострофф · 15.05.2012, 14:14

Или так-

Visual Basic
1
2
3
4
5
6
7
8
9
on error resume next
set wb=workbooks("файл.xls")
if err then
   ' не открыто
  err.clear 'очистить заодно ошибку, чтоб не мешалась дальше
else
   ' открыто
end if
on error goto 0 'восстановить обычный обработчик ошибок

@IvanOK · 15.05.2012, 17:57 **[ТС]**

Сообщение от Апострофф

on error resume next

что делает ето

Добавлено через 10 секунд

Сообщение от Апострофф

on error goto 0

и ето

Добавлено через 23 секунды

Сообщение от Апострофф

err.clear

и ето

@Апострофф · 15.05.2012, 19:14

Не по теме:

IvanOK, найдёшь ли ты когда-нибудь кнопку [F1]?

@IvanOK · 16.05.2012, 11:16 **[ТС]**

Апострофф, я то ее нашел....но но меня интересует где прописать нужно ету фразу перед началом всего кода или где то всередине где возможно ошибка

@Апострофф · 16.05.2012, 11:31

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

где прописать нужно ету фразу

Вообще говоря, лучше нигде ету фразу не писать!
В данном случае можно было циклом по открытым книгам проверить, есть ли интересующая нас.
Но если уж приспичит, то писать перед местом возможной ошибки, сразу же после проблемного кода проверить на наличие ошибки (if err then), обработать ошибку, очистить (err.clear) и восстановить штатный обработчик (on error goto 0), чтобы не проверять самому ошибки на каждой строчке кода.

@IvanOK · 16.05.2012, 12:29 **[ТС]**

Апострофф, вот а я то думал что он на весь текст кода, а он тока в проблемном коде

Добавлено через 1 минуту
Апострофф, хорошо тогда как повсему коду устранять возможние неполадки кода, если я точно не знаю где может возникнуть ошыбка....

Добавлено через 21 секунду

Остап Бонд · 30.10.2018, 00:58

Пишем

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
SUB qqq
on error  goto nafik
 
'сама sub
 
exit sub
'внизу
nafik:
 
STOP'ищем причину (WATH, LOCALS, Debug, F1, ГУГЛ в помощь)
 
end sub

Новые блоги и статьи Все статьи Все блоги /
Angular: Вопросы и ответы на собеседовании Reangularity 15.06.2025 Готовишься к техническому интервью по Angular? Я собрал самые распространенные вопросы, с которыми сталкиваются разработчики на собеседованиях в этом году. От базовых концепций до продвинутых. . .	Архитектура Onion в ASP.NET Core MVC stackOverflow 15.06.2025 Что такое эта "луковая" архитектура? Термин предложил Джеффри Палермо (Jeffrey Palermo) в 2008 году, и с тех пор подход только набирал обороты. Суть проста - представьте себе лук с его. . .	Unity 4D GameUnited 13.06.2025 Четырехмерное пространство. . . Звучит как что-то из научной фантастики, правда? Однако для меня, как разработчика со стажем в игровой индустрии, четвертое измерение давно перестало быть абстракцией из. . .	SSE (Server-Sent Events) в ASP.NET Core и .NET 10 UnmanagedCoder 13.06.2025 Кажется, Microsoft снова подкинула нам интересную фичу в новой версии фреймворка. Работая с превью . NET 10, я наткнулся на нативную поддержку Server-Sent Events (SSE) в ASP. NET Core Minimal APIs. Эта. . .	С днём независимости России! Hrethgir 13.06.2025 Решил побеседовать, с утра праздничного дня, с LM о завоеваниях. То что она написала о народе, представителем которого я являюсь сам сначала возмутило меня, но дальше только смешило. Это чисто. . .
Лето вокруг. kumehtar 13.06.2025 Лето вокруг. Наполненное бурями и ураганами событий. На фоне магии Жизни, священной и вечной, неумелой рукой человека рисуется панорама душевного непокоя. Странные серые краски проникают и. . .	Популярные LM модели ориентированы на увеличение затрат ресурсов пользователями сгенерированного кода (грязь -заслуги чистоплюев). Hrethgir 12.06.2025 Вообще обратил внимание, что они генерируют код (впрочем так-же ориентированы разработчики чипов даже), чтобы пользователь их использующий уходил в тот или иной убыток. Это достаточно опытные модели,. . .	Топ10 библиотек C для квантовых вычислений bytestream 12.06.2025 Квантовые вычисления - это та область, где теория встречается с практикой на границе наших знаний о физике. Пока большая часть шума вокруг квантовых компьютеров крутится вокруг языков высокого уровня. . .	Dispose и Finalize в C# stackOverflow 12.06.2025 Работая с C# больше десяти лет, я снова и снова наблюдаю одну и ту же историю: разработчики наивно полагаются на сборщик мусора, как на волшебную палочку, которая решит все проблемы с памятью. Да,. . .	Повышаем производительность игры на Unity 6 с GPU Resident Drawer GameUnited 11.06.2025 Недавно копался в новых фичах Unity 6 и наткнулся на GPU Resident Drawer - штуку, которая заставила меня присвистнуть от удивления. По сути, это внутренний механизм рендеринга, который автоматически. . .

Как проверить, открыто ли определенное окно (файл)

Решение

Решение

Решение

@IvanOK 693 / 99 / 10 Регистрация: 25.06.2011 Сообщений: 718

	Как проверить, открыто ли определенное окно (файл) 15.05.2012, 14:01. Показов 3788. Ответов 8 Метки нет (Все метки) как прорверить открыто окно(файл) или нет... если да то... если нет то.... зарание благодарен 0

@Апострофф
	15.05.2012, 19:14
	Не по теме: IvanOK, найдёшь ли ты когда-нибудь кнопку [F1]? 1

@IvanOK 693 / 99 / 10 Регистрация: 25.06.2011 Сообщений: 718
	16.05.2012, 11:16 [ТС]
	Апострофф, я то ее нашел....но но меня интересует где прописать нужно ету фразу перед началом всего кода или где то всередине где возможно ошибка 0

@IvanOK 693 / 99 / 10 Регистрация: 25.06.2011 Сообщений: 718
	16.05.2012, 12:29 [ТС]
	Апострофф, вот а я то думал что он на весь текст кода, а он тока в проблемном коде Добавлено через 1 минуту Апострофф, хорошо тогда как повсему коду устранять возможние неполадки кода, если я точно не знаю где может возникнуть ошыбка.... Добавлено через 21 секунду 0