powered by simpleCommunicator - 2.0.54     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как сделать активным лист в нетекущей книге?
6 сообщений из 6, страница 1 из 1
Как сделать активным лист в нетекущей книге?
    #37397699
dima_ryzhov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Здравствуйте!
Собственно, сабж
Благодарю за внимание и Ваши советы!
...
Рейтинг: 0 / 0
Как сделать активным лист в нетекущей книге?
    #37397710
majestic-mike
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
dima_ryzhov,

А что значит "Нетекущая книга"? создайте сколь угодно много экземпляров Excel - в каждом откройте по книге - получите объекты, в которых какие угодно листы активируете и как вам нужно обрабатывайте
...
Рейтинг: 0 / 0
Как сделать активным лист в нетекущей книге?
    #37398387
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Методом Activate.

Как до листа добраться, зависит от того, что подразумевается под "нетекущей книгой"

не жалей букв на вопрос, чтобы получить вменяемый ответ
...
Рейтинг: 0 / 0
Как сделать активным лист в нетекущей книге?
    #37398739
dima_ryzhov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro, спасибо за ответ.
Так... пробую еще раз :)
под текущей я имею в виду Книгу, из которой запускается макрос
мне нужно, например, написать "bla-bla-bla" в ячейке A1 листа 1 Книги, открытой обычным способом
Код: plaintext
1.
Application.Workbooks.Open "E:\My_workbook.XLS"
Kn1 = ActiveWorkbook.Name
...
Рейтинг: 0 / 0
Как сделать активным лист в нетекущей книге?
    #37398745
dima_ryzhov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
то, что я описал выше, не так интересно, и решается просто
Код: plaintext
1.
2.
Application.Workbooks.Open "C:\test\2.xls"
kn1 = ActiveWorkbook.Name
Workbooks(kn1).Worksheets( 1 ).Cells( 1 ,  1 ) =  500 
а как можно на первый лист второй Книги поставить автофильтр?
...
Рейтинг: 0 / 0
Как сделать активным лист в нетекущей книге?
    #37398850
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну, собственно, ты сам почти ответил на свой вопрос.
Вообще, для обращения к чужой книге удобно будет завести переменную, то есть переделать твой пример таким образом:
Код: plaintext
1.
2.
Dim NewBook as Workbook
Set NewBook=Application.Workbooks.Open("C:\test\2.xls")
NewBook.Worksheets( 1 ).Cells( 1 ,  1 ) =  500 
То есть в переменной NewBook у тебя будет жить ссылка на другую книгу и через нее ты можешь делать с ней все, что угодно, например поставить автофильтр...

это ответ на первую часть вопроса. Вторая часть - как поставить автофильтр....
Сервис-Макросы-Начать запись
делаешь что требуется, останавливаешь запись, смотришь, что получилось, адаптируешь под свои нужды
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как сделать активным лист в нетекущей книге?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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