ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / настраиваемая сортировка
8 сообщений из 8, страница 1 из 1
настраиваемая сортировка
    #36402343
Vasilisk_and
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vasilisk_and
Гость
Спасибо всем откликнувшимся.
Как отсортировать таблицу:

например:

Швеллер 15
Лист 5
уголок 45
Швеллер 5
Уголок 35
Лист 3
Швеллер 10

к виду

Швеллер 5
Швеллер 10
Швеллер 15

Уголок 35
Уголок 45

Лист 3
Лист 5

P.S. С помощью "Настраиваемой сортировки" не вышло
...
Рейтинг: 0 / 0
10.01.2010, 15:08
| Ответить | Цитировать | Написать  
настраиваемая сортировка
    #36402370
m
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
m
Гость
Я бы сделал так:
Справа через одну колонку вывел бы первую часть строк (текстовую) через формулу:
=ПСТР(A1;1;ПОИСК(" ";A1))
В следующую за ней вывел бы число через формулу:
=ЗНАЧЕН(СЖПРОБЕЛЫ(ПСТР(A1;ПОИСК(" ";A1);ДЛСТР(A1)-ПОИСК(" ";A1)+1)))
И так сделал для всех значений. Потом бы копировал все это и вставил бы как значения, что бы убрать формулы. Потом бы сделал сортировку по 2м критериям (двум колонкам) сначала текст потом числа. И в конечном итоге все это собрал бы назад формулой СЦЕПИТЬ.
...
Рейтинг: 0 / 0
10.01.2010, 15:28
| Ответить | Цитировать | Написать  
настраиваемая сортировка
    #36402391
Vasilisk_and
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vasilisk_and
Гость
Сапибо, но данное решение не подходит, надо отсортировать текст не по алфавиту, а по
Швеллер, уголок, лист и т.п. и все это на VBA
...
Рейтинг: 0 / 0
10.01.2010, 15:42
| Ответить | Цитировать | Написать  
настраиваемая сортировка
    #36402392
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
Придется заменить все-таки 5 на 05, 3 на 03 и т.д. Или есть есть трехзначные числа, то все к 3-хзначному виду нужно приводить, это правильно изначально. Надеюсь как быстро заменить проблем не возникнет, но на всякий случай приведу интересный способ:
для диапазона [A1:A7], в макросе запустите строку:
Код: plaintext
[A1:A7] = [IF(A1:A7="","",MID(A1:A7, 1 ,SEARCH(" ",A1:A7))&TEXT(MID(A1:A7,SEARCH(" ",A1:A7), 5 ),"000"))]
...
Рейтинг: 0 / 0
10.01.2010, 15:43
| Ответить | Цитировать | Написать  
настраиваемая сортировка
    #36409782
Djon Player
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Djon Player
Участник
Может я что-то не понял, а разве такой код не поможет:
Код: plaintext
1.
2.
3.
4.
Columns("A:B").Sort Key1:=Range("A2"), Order1:=xlDescending, Key2:=Range("B2") _
        , Order2:=xlAscending, Header:=xlGuess, OrderCustom:= 1 , MatchCase:= _
        False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, DataOption2 _
        :=xlSortNormal
Даные должны находиться в столбцах А и B
...
Рейтинг: 0 / 0
14.01.2010, 13:59
| Ответить | Цитировать | Написать  
настраиваемая сортировка
    #36409789
Djon Player
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Djon Player
Участник
Djon PlayerМожет я что-то не понял, а разве такой код не поможет:
Код: plaintext
1.
2.
3.
4.
Columns("A:B").Sort Key1:=Range("A2"), Order1:=xlDescending, Key2:=Range("B2") _
        , Order2:=xlAscending, Header:=xlGuess, OrderCustom:= 1 , MatchCase:= _
        False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, DataOption2 _
        :=xlSortNormal
Даные должны находиться в столбцах А и B
А в первой строке должен быть заголовок.
...
Рейтинг: 0 / 0
14.01.2010, 13:59
| Ответить | Цитировать | Написать  
настраиваемая сортировка
    #36409810
Vasilisk_and
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vasilisk_and
Гость
Спасибо, разобрался
...
Рейтинг: 0 / 0
14.01.2010, 14:04
| Ответить | Цитировать | Написать  
настраиваемая сортировка
    #36411723
DaniilK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DaniilK
Участник
Просто к сведению:то что хочется можно и не формулами и не макросом, а просто используя встроенные возможности Excel.
...
Рейтинг: 0 / 0
15.01.2010, 11:44
| Ответить | Цитировать | Написать  
8 сообщений из 8, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / настраиваемая сортировка
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&fpage=174&tid=2178612]:
 0ms
get settings:
 11ms
get forum list:
 16ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 68ms
get topic data:
 18ms
get forum data:
 3ms
get page messages:
 46ms
get tp. blocked users:
 2ms
others: 204ms
total:  374ms
созд. / загр.: 374ms
x
x
Закрыть


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