Здравствуйте!
Помогите, пожалуйста, с решением проблемы. В книге есть листы «январь», «февраль», …, «декабрь». Мне нужно осуществить возможность сортировки листов как по возрастанию, так и по убыванию. Я пошёл в направлении того, что необходимо "выдернуть" порядковый номер месяца по его названию. Поискав в Интернете, нашёл формулу Serge 007:
,где в B1 название месяца. Пытаюсь переложить её на VBA
ничего не получается. Формула работает, строка в VBA даёт ошибку. Подскажите, пожалуйста, где и в чём мои действия неверны? Или это вообще нужно решать по-другому? Нашёл ещё один вариант, где русские названия месяцев «упаковываются» в массив и оттуда тянутся номера, но мне видится, что эту задачу можно решить проще.
Спасибо!
Помогите, пожалуйста, с решением проблемы. В книге есть листы «январь», «февраль», …, «декабрь». Мне нужно осуществить возможность сортировки листов как по возрастанию, так и по убыванию. Я пошёл в направлении того, что необходимо "выдернуть" порядковый номер месяца по его названию. Поискав в Интернете, нашёл формулу Serge 007:
Код |
---|
=МЕСЯЦ(B1&0) |
,где в B1 название месяца. Пытаюсь переложить её на VBA
Код |
---|
=Month(Cells(1, 2) & 0) |
ничего не получается. Формула работает, строка в VBA даёт ошибку. Подскажите, пожалуйста, где и в чём мои действия неверны? Или это вообще нужно решать по-другому? Нашёл ещё один вариант, где русские названия месяцев «упаковываются» в массив и оттуда тянутся номера, но мне видится, что эту задачу можно решить проще.
Спасибо!