Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Поиск листа в книге Excel (VBA) / 3 сообщений из 3, страница 1 из 1
24.04.2012, 11:43
    #37767808
Just_Serg
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск листа в книге Excel (VBA)
Добрый день всем!

Получаю ссылку на лист "Лист1" в некоей открытой книге Excel.

Код: vbnet
1.
Set ShFil = Workbooks(FilFile).Sheets("Лист1")



Соответственно, если в книге листа нет - падает с ошибкой. Как бы это дело проверить? Пробежаться по всем листам в книге и поискать по названию? Или можно как-то проще сделать?
Заранее благодарен за помощь!
...
Рейтинг: 0 / 0
24.04.2012, 11:57
    #37767839
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск листа в книге Excel (VBA)
Код: vbnet
1.
2.
3.
4.
On Error Resume Next
Set ShFil = Workbooks(FilFile).Sheets("Лист1")
If Err<>0 Then Msgbox "Нет такого листа"
On Error Goto 0
...
Рейтинг: 0 / 0
24.04.2012, 15:20
    #37768378
Just_Serg
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск листа в книге Excel (VBA)
Shocker.Pro
Код: vbnet
1.
2.
3.
4.
On Error Resume Next
Set ShFil = Workbooks(FilFile).Sheets("Лист1")
If Err<>0 Then Msgbox "Нет такого листа"
On Error Goto 0



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


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