Excel - неправильная сортировка автофильтром

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Var13
Начинающий
Начинающий
 
Сообщения: 13
Зарегистрирован: 11.04.2007 (Ср) 10:54

Excel - неправильная сортировка автофильтром

Сообщение Var13 » 25.04.2007 (Ср) 9:34

Подскажите плиз:

В Excel 2000 (9.0.6926 SP-3) устанавливаем автофильтр на
столбец с числами в текстовом формате с разным количеством цифр в ячейке.

Если нажать кнопку автофильтр, то видим что сортировка в сплывающем меню идет сначала из диапазона с 4 цифрами, потом среди диапазона с 5 цифрами т.д. хотя если вместо цифр - слова - то по буквам сортировка правильная, вне зависимости от длины слова.

Пример:
данные в ячейке: ....... данные при нажатии автофильтр:
1112 ............................. 119
1113 ............................. 1112
1119 ............................. 1113
1114 ............................. 1114
119 ............................... 1119


а, нужно:
1112
1113
1114
1119
119

а, буквы сортирует правильно:
маа
мааа
мааб
маб

Как в режиме автофильтра(в сплывающем меню выбора) добиться правильной сортировки с цифрами?
Сергей

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 25.04.2007 (Ср) 9:53

Ты уверен, что там именно текст, а не числа в текстовом формате?
Если ввести число в ячейку, а затем этой ячейке назначить формат "Текстовый", значение ячейки все-равно останется числовым. Чтобы оно стало текстовым, числа надо вводить после того, как будет задан текстовый формат.
Lasciate ogni speranza, voi ch'entrate.

uhm
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1597
Зарегистрирован: 02.12.2004 (Чт) 15:21

Сообщение uhm » 25.04.2007 (Ср) 10:11

Подтверждаю эффект - даже если числа в текстовом формате, автофильтр отсортирует их как числа.

Что с этим делать - пока не придумал :)

Upd: все плохо. Похоже, если в ячейке стоит что-то, что может быть интерпретировано как число, автофильтр его так и интерпретирует. Т. е. если даже вместо "1112" написать в приведенном автором примере " +1112", эта запись в автофильтре будет идти после "119" и перед "1113".
Быть... или не быть. Вот. В чём вопрос?

Var13
Начинающий
Начинающий
 
Сообщения: 13
Зарегистрирован: 11.04.2007 (Ср) 10:54

Сообщение Var13 » 25.04.2007 (Ср) 13:26

так и есть - столбец с числами может быть в любом формате - числовой, общий, текстовый - эффект один - сортирует правильно только буквы, а числа сортирует неправильно!
Сергей

kibernetics
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 945
Зарегистрирован: 03.05.2006 (Ср) 13:31
Откуда: Minsk

Сообщение kibernetics » 25.04.2007 (Ср) 14:42

примени макрос:
Код: Выделить всё
Sub SortAscending_NoHeader()
  Cells.Sort Key1:=ActiveCell,
  Order1:=xlAscending, Header:=xlNo, _
  OrderCustom:=1, MatchCase:=False, _
  Orientation:=xlTopToBottom
End Sub

Var13
Начинающий
Начинающий
 
Сообщения: 13
Зарегистрирован: 11.04.2007 (Ср) 10:54

Сообщение Var13 » 25.04.2007 (Ср) 15:40

Спасибо, но что то у меня не получается запустить его:
пишет: Syntax error

как я понял этот макрос нужно постоянно запускать.
Я думал в Excel какие-то параметры надо поменять для корректной сортировки.
Сергей

kibernetics
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 945
Зарегистрирован: 03.05.2006 (Ср) 13:31
Откуда: Minsk

Сообщение kibernetics » 25.04.2007 (Ср) 16:03

Var13
нет. его нужно один раз запустить.
Код: Выделить всё
Sub SortAscending_NoHeader()
  Cells.Sort Key1:=ActiveCell, _
  Order1:=xlAscending, Header:=xlNo, _
  OrderCustom:=1, MatchCase:=False, _
  Orientation:=xlTopToBottom
End Sub


там ошибка в переносе строки. попробуй еще раз

Var13
Начинающий
Начинающий
 
Сообщения: 13
Зарегистрирован: 11.04.2007 (Ср) 10:54

Сообщение Var13 » 27.04.2007 (Пт) 13:01

всё равно не работает :(
я в файле создал этот макрос, запустил его,
включил автофтльтр, и всё равно не работает.

т.е. если в столбце в ячейках будут цифры(числоваой формат=текст),
то в режиме автофильтра он все равно сортирует как цифры,
а не как буквы, т.е. сначала с малой длиной, потом большей и т.д.
112
118
119
1112
1113
Сергей

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 27.04.2007 (Пт) 13:09

Var13, это тебе зачем-то предлагали каждый раз использовать этот код вместо автофильтра, а никак не перед.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Var13
Начинающий
Начинающий
 
Сообщения: 13
Зарегистрирован: 11.04.2007 (Ср) 10:54

Сообщение Var13 » 27.04.2007 (Пт) 13:48

Пробовал на Excel 2003 - то же самое :(

И как же быть тогда ? Как с этим бороться ?
Или это "глюк" Excel ???
Сергей

uhm
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1597
Зарегистрирован: 02.12.2004 (Чт) 15:21

Сообщение uhm » 27.04.2007 (Пт) 15:32

Похоже, что никак :(
Быть... или не быть. Вот. В чём вопрос?


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 4

    TopList