|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
02.07.2009, 04:56 | #1 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
При закрытии книги переключится в рабочий лист
Есть листы с названиями: "АПРЕЛЬ", "МАЙ", "ИЮНЬ" - это рабочие листы и еще есть с 10 доплнит. листов.
Пусть, ЕЩЕ сегодня, будет ИЮНь, я чета делал в Листе10 и закрываю книгу при открытии книги, книга откроется с Лист10, а мне надо лист ИЮНЬ. Если в макросе я ставлю, что бы при открытии книги стал активный лист ИЮНЬ, то не корректно работает макрос. Код:
Как при закрытии книги автоматом, переключиться в лист = текущему месяцу(ИЮНЬ)? Код:
Последний раз редактировалось valerij; 02.07.2009 в 05:15. |
02.07.2009, 12:14 | #2 | |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
Цитата:
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
|
02.07.2009, 12:38 | #3 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
|
02.07.2009, 14:35 | #4 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
извини, так надо:
Sheets(Sheets(MonthRus(Month(Now) - 1)).Index + 1).Name = MonthRus(Month(Now)) я ж написал доведи функцию MonthRus до конца, там очевидно все
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
02.07.2009, 15:13 | #5 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
Игорь, но не мне!
Ошибки нет, но и возврата нет, сохраняю в сентябре, так же и открываю, взгляни. |
02.07.2009, 15:54 | #6 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
это как понимать? в Мариуполе 1-й месяц - это июль, а 2-й - август????
В Киеве сейчас месяц №7 это июль, або лыпень, якщо Вам так зручнише, а по Мариупольскому летоисчислению который? Предполагалось функция MonthRus(м) получает номер месяца в качестве параметра, а возвращает его русское название БОЛЬШИМИ буквами. Соответсвенно 1-й - это январь, 2 - феврарь и т.д., еще 10 раз (сам допишешь или перечислить названия месяцев?). Все эта ерунда работает не с последним месяцем, который заполнен в файле, а с текущим. При каждом открытии книга активным становится лист, название которого соответствует текущему месяцу, если листа с таким именем нет - он добавляется в книгу. Еще предполагается, что в книге существует листы, соответствующие всем уже прошедшим в этом году месяцам. В твоей книге, как минимум надо завести лист с именем ИЮНЬ. Когда в книге вообще еще нет листов с названиями месяцев, ЯНВАРЬ добавляется в самый конец списка листов.
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
02.07.2009, 16:33 | #7 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
|
02.07.2009, 18:24 | #8 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
ладно, я понял - обьяснять что должна сделать MonthRus дольше, чем написать ее самому.
вот вариант кода: Код:
1. при каждом открытии книги активным становится лист, название которого совпадает с названием текущего месяца, полученного от MonthRus. 2. если листа с таким именем нет - в книгу добавляется новый лист, который вставляется за предыдущим месяцем если он есть и в конец списка листов, если предыдущего месяца нет на листе.
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
03.07.2009, 00:38 | #9 | |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
Цитата:
Можно сделать, что бы не при открытии, а при закрытии, это связанно с макросом Vniz, Vverh. Я не знаю, почему так происходит, но если так как у тебя, то скролл работает и что бы он не работал, мне в ручную надо щелкнуть PGDN-PGUP или перещелкнуть листы, я уже в каждый лист(ИЮЛЬ, АВГУСТ, СЕНТЯБРЬ) вставил: Код:
Почему то так заработало Код:
Последний раз редактировалось valerij; 03.07.2009 в 00:47. |
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Сохранение копии книги при ее закрытии. | Busine2009 | Microsoft Office Excel | 17 | 17.06.2009 04:36 |
Автозапуск макроса при открытии и закрытии книги | ruavia3 | Microsoft Office Excel | 8 | 06.04.2009 11:09 |
Как выполнить действие при закрытии Книги? | valerij | Microsoft Office Excel | 9 | 12.03.2009 15:31 |
При закрытии книги, удаляются листы | Romuald | Microsoft Office Excel | 3 | 20.01.2009 21:34 |
Как защитить рабочий лист от ввода с клавиатуры, но не от действий макроса ? | valerij | Microsoft Office Excel | 7 | 28.05.2008 23:59 |