Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Запуск макроса для определенных листов / 14 сообщений из 14, страница 1 из 1
29.12.2009, 12:56
    #36391700
ffflake
ffflake
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
Подскажите плиз, как сделать так чтобы макрос запускался только для определенных листов, т.е. например? для листов, которые начинаются с буквы "A"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2009, 13:13
    #36391750
m
m
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
if left(sheets(i).name) = "A" then
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2009, 14:03
    #36391902
ffflake
ffflake
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
m,

Ругается на left
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2009, 14:04
    #36391905
m
m
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
Вы бы справку глянули :), так
if left(sheets(i).name,1) = "A" then
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2009, 14:14
    #36391928
ffflake
ffflake
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
m,

Огромнейшеее спасибо!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2009, 14:16
    #36391936
ffflake
ffflake
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
ffflake,

Только вот какая проблема, я делаю так

For i = 1 To 3 Step 1
If Left(Sheets(i).Name, 3) = "QIF" Then Application.Run "t.xls!a2_QIF"
Next i

а он все равно обрабатывает только тот лист на котором нахожусь
что я делаю не так
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2009, 14:37
    #36392004
Hugo121
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
Так это уже в коде того макроса надо смотреть, что бы он обрабатывал не активный лист, а лист с соответствующим именем или порядковым номером.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2009, 14:41
    #36392015
ffflake
ffflake
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
Hugo121,

внесла изменения
For i = 1 To 5 Step 1
If Left(Sheets(i).Name, 3) = "QIF" Then Sheets(i).Select
Application.Run "t.xls!a2_QIF"
Next i

становится на тот лист который нужно, но обрабатывает столько раз сколько указываю в цикле, как показать что нужно обрабатывать только тот на котором стоит, ну т.е. какой активный
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2009, 14:48
    #36392035
Hugo121
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
Код: plaintext
1.
2.
3.
4.
For i =  1  To  5  Step  1 
If Left(Sheets(i).Name,  3 ) = "QIF" Then Sheets(i).Select : Sheets(i).Activate
Application.Run "t.xls!a2_QIF"
Next i
Так попробуйте.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2009, 14:50
    #36392041
Hugo121
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
Поправка:
Код: plaintext
1.
2.
3.
4.
For i =  1  To  5  Step  1 
If Left(Sheets(i).Name,  3 ) = "QIF" Then Sheets(i).Select : Sheets(i).Activate: Application.Run "t.xls!a2_QIF"
Next i
Хотя теперь активировать может и не надо... не помню.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2009, 15:04
    #36392084
ffflake
ffflake
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
Hugo121,

Супер, шикарно получается, спасибо большое!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2009, 15:15
    #36392121
m
m
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
авторХотя теперь активировать может и не надо... не помню.
я тоже думаю что не надо :)...
по-моему разница в методах select и activate в том, что когда выделена группа листов первый снимает выделение с группы а второй нет. вероятно, когда группа не выделена их действия одинаковые.

Вопрос:
Зачем здесь
Код: plaintext
For i =  1  To  5  Step  1
указывать Step 1 ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2009, 15:19
    #36392130
ffflake
ffflake
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
m,

вобщем-то естественно step 1 естественно не нужнен, просто до этого делала другой цикл где указывала шаг -1, не убрала, не убрала
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2009, 16:00
    #36392278
m
m
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск макроса для определенных листов
ясно, просто спросил... :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Запуск макроса для определенных листов / 14 сообщений из 14, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 479ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2178652]:
 0ms
get settings:
 8ms
get forum list:
 16ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 170ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 40ms
get tp. blocked users:
 1ms
others: 227ms
total:  479ms
x
x
Закрыть


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