сортировка листов в обратном порядке
anzhela6660
Дата: Среда, 17.12.2014, 22:50 |
Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 13
Репутация:
0
±
Замечаний:
0% ±
Excel 2007
Добрый день. Подскажите как отсортировать листы в обратном порядке в книге. Листов уйма может быть. Например в книге так "Лист b " "Лист a" "Лист 5" а надо "Лист 5" "Лист a" "Лист b " Спасибо
Добрый день. Подскажите как отсортировать листы в обратном порядке в книге. Листов уйма может быть. Например в книге так "Лист b " "Лист a" "Лист 5" а надо "Лист 5" "Лист a" "Лист b " Спасибо anzhela6660
Ответить
Сообщение Добрый день. Подскажите как отсортировать листы в обратном порядке в книге. Листов уйма может быть. Например в книге так "Лист b " "Лист a" "Лист 5" а надо "Лист 5" "Лист a" "Лист b " Спасибо Автор - anzhela6660 Дата добавления - 17.12.2014 в 22:50
anzhela6660
Дата: Среда, 17.12.2014, 23:34 |
Сообщение № 2
Группа: Пользователи
Ранг: Новичок
Сообщений: 13
Репутация:
0
±
Замечаний:
0% ±
Excel 2007
решили проблему. Может кому пригодится Sub ReversSort() Dim i As Integer For i = 0 To Sheets.Count - 1 Sheets(Sheets.Count).Move Before:=Sheets(i + 1) Next i End Sub
решили проблему. Может кому пригодится Sub ReversSort() Dim i As Integer For i = 0 To Sheets.Count - 1 Sheets(Sheets.Count).Move Before:=Sheets(i + 1) Next i End Sub anzhela6660
Ответить
Сообщение решили проблему. Может кому пригодится Sub ReversSort() Dim i As Integer For i = 0 To Sheets.Count - 1 Sheets(Sheets.Count).Move Before:=Sheets(i + 1) Next i End Sub Автор - anzhela6660 Дата добавления - 17.12.2014 в 23:34