ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Макрос сортировки по возрастанию построчно в области
12 сообщений из 12, страница 1 из 1
Макрос сортировки по возрастанию построчно в области
    #37781484
whizzzkey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
whizzzkey
Гость
Всем привет, помогите пожалуйста составить макрос EXCEL для построчной сортировки - к примеру есть некая матрица данных из 3 строк и 5 столбцов
Код: vbnet
1.
2.
3.
4.
5.
..............
0 12 4 8 9
3 6 2 14 7
18 5 9 0 4
.............



нужно осторитровать по возрастанию в каждой строке

Код: vbnet
1.
2.
3.
4.
5.
..............
0 4 8 9 12
2 3 6 7 14
0 4 5 9 18
..............
...
Рейтинг: 0 / 0
04.05.2012, 08:41
| Ответить | Цитировать | Написать  
Макрос сортировки по возрастанию построчно в области
    #37781488
whizzzkey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
whizzzkey
Гость
P.S. стандартным методом excel сортирует только одну строку
...
Рейтинг: 0 / 0
04.05.2012, 08:42
| Ответить | Цитировать | Написать  
Макрос сортировки по возрастанию построчно в области
    #37781493
Фотография Serge 007
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge 007
Участник
whizzzkey,

Макросами не знаю как, поэтому формулами:
Код: vbnet
1.
=НАИМЕНЬШИЙ($A1:$E1;СТОЛБЕЦ(A1))
...
Рейтинг: 0 / 0
04.05.2012, 08:51
| Ответить | Цитировать | Написать  
Макрос сортировки по возрастанию построчно в области
    #37781507
whizzzkey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
whizzzkey
Гость
к сожалению мне нужно макросом, так как отчет в котором я собираюсь это сделать содержит ООООЧЧЧЕНЬЬ!!!много строк(>1000) и вручную вбивать формулы в каждую ячейку как то не вариант
...
Рейтинг: 0 / 0
04.05.2012, 09:04
| Ответить | Цитировать | Написать  
Макрос сортировки по возрастанию построчно в области
    #37781552
Фотография Serge 007
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge 007
Участник
whizzzkeyк сожалению мне нужно макросом, так как отчет в котором я собираюсь это сделать содержит ООООЧЧЧЕНЬЬ!!!много строк(>1000) и вручную вбивать формулы в каждую ячейку как то не вариантЭто занимает не более 2-х секунд
...
Рейтинг: 0 / 0
04.05.2012, 09:36
| Ответить | Цитировать | Написать  
Макрос сортировки по возрастанию построчно в области
    #37781558
whizzzkey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
whizzzkey
Гость
ты не понял, в ячейках у меня уже есть данные, мне нужно их осортировать , а твой способ хорош для автозаполнения
...
Рейтинг: 0 / 0
04.05.2012, 09:42
| Ответить | Цитировать | Написать  
Макрос сортировки по возрастанию построчно в области
    #37781563
Фотография Serge 007
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge 007
Участник
whizzzkeyты не понял
Мы что, знакомы?

Ясно. Ждите макрописателей
...
Рейтинг: 0 / 0
04.05.2012, 09:46
| Ответить | Цитировать | Написать  
Макрос сортировки по возрастанию построчно в области
    #37781565
Фотография Serge 007
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge 007
Участник
Хотя уже сейчас можно было бы воспользоваться формулой, скопировать результат и вставить как значение...
...
Рейтинг: 0 / 0
04.05.2012, 09:48
| Ответить | Цитировать | Написать  
Макрос сортировки по возрастанию построчно в области
    #37781567
Фотография Serge 007
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge 007
Участник
Три-четыре секунды на один лям строк...
...
Рейтинг: 0 / 0
04.05.2012, 09:48
| Ответить | Цитировать | Написать  
Макрос сортировки по возрастанию построчно в области
    #37781625
nilem
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nilem
Гость
Типа такого
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Sub ert()
Dim r As Range
Application.ScreenUpdating = 0
With [a1].CurrentRegion
    For Each r In .Rows
        r.Sort Key1:=r.Cells(1), Order1:=xlAscending, Orientation:=xlLeftToRight
    Next
End With
Application.ScreenUpdating = 1
End Sub
...
Рейтинг: 0 / 0
04.05.2012, 10:33
| Ответить | Цитировать | Написать  
Макрос сортировки по возрастанию построчно в области
    #37781644
whizzzkey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
whizzzkey
Гость
спасибо щас попробую.

2Serge 007 : еще раз говорю - твоим примером не получается - теряются данные, т.к вместо выделения происходит автозаполнение
...
Рейтинг: 0 / 0
04.05.2012, 10:42
| Ответить | Цитировать | Написать  
Макрос сортировки по возрастанию построчно в области
    #37782348
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PlanB
Участник
whizzzkeyсодержит ООООЧЧЧЕНЬЬ!!!много строк(>1000)вы такое на форуме sql-server только не пишите
...
Рейтинг: 0 / 0
04.05.2012, 16:06
| Ответить | Цитировать | Написать  
12 сообщений из 12, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Макрос сортировки по возрастанию построчно в области
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&fpage=102&tid=2175749]:
 0ms
get settings:
 7ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 63ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 43ms
get tp. blocked users:
 1ms
others: 233ms
total:  381ms
созд. / загр.: 381ms
x
x
Закрыть


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