Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/ограничение длины строки в Select Case - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » ограничение длины строки в Select Case (Макросы/Sub)
ограничение длины строки в Select Case
berya Дата: Воскресенье, 11.11.2018, 19:26 | Сообщение № 1
Группа: Проверенные
Ранг: Новичок
Сообщений: 27
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007
Добрый день.
Есть макрос по ранжировке совпадений в таблице
Алгоритм работы макроса
Выбирается ячейка с максимальным номером участников - в данном случае "13" - колонка "E"
затем макрос сортирует по количеству совпадений по колонке "J" и записывает все значения в массив
Потом идет выбор нобора сортировки для правильного размещения спорсменов по сетке соревнований
и сортировка по выбранному порядку.
до определенного количества чисел в значении совпадений (10 совпадений) все знвчения передайтся в строчное значение правильно.
после 10 совпадений - получаю в значениях 10101010101010101010333 а Select Case 1.31313131313131E+25 и соотвественно выбор не происходит
Как побороть эту проблему и есть ли другой путь решения задачи
Большое спасибо за возможную помощь
К сообщению приложен файл: test.xlsb(32.7 Kb)
 
Ответить
СообщениеДобрый день.
Есть макрос по ранжировке совпадений в таблице
Алгоритм работы макроса
Выбирается ячейка с максимальным номером участников - в данном случае "13" - колонка "E"
затем макрос сортирует по количеству совпадений по колонке "J" и записывает все значения в массив
Потом идет выбор нобора сортировки для правильного размещения спорсменов по сетке соревнований
и сортировка по выбранному порядку.
до определенного количества чисел в значении совпадений (10 совпадений) все знвчения передайтся в строчное значение правильно.
после 10 совпадений - получаю в значениях 10101010101010101010333 а Select Case 1.31313131313131E+25 и соотвественно выбор не происходит
Как побороть эту проблему и есть ли другой путь решения задачи
Большое спасибо за возможную помощь

Автор - berya
Дата добавления - 11.11.2018 в 19:26
Michael_S Дата: Воскресенье, 11.11.2018, 19:33 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 1884
Репутация: 352 ±
Замечаний: 0% ±

Excel2016
У вас в коде
[vba]
Код
Select Case Str
        Case 1111111111111#  
[/vba]
case - strung, а проверяете число. Нужно:
[vba]
Код
Select Case Str
        Case "1111111111111"  
[/vba]


ЯД: 41001136675053
WM: R389613894253


Сообщение отредактировал Michael_S - Воскресенье, 11.11.2018, 19:34
 
Ответить
СообщениеУ вас в коде
[vba]
Код
Select Case Str
        Case 1111111111111#  
[/vba]
case - strung, а проверяете число. Нужно:
[vba]
Код
Select Case Str
        Case "1111111111111"  
[/vba]

Автор - Michael_S
Дата добавления - 11.11.2018 в 19:33
berya Дата: Воскресенье, 11.11.2018, 19:38 | Сообщение № 3
Группа: Проверенные
Ранг: Новичок
Сообщений: 27
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007
Michael_S, Принял, исправил - не подумал в этом направлении
 
Ответить
СообщениеMichael_S, Принял, исправил - не подумал в этом направлении

Автор - berya
Дата добавления - 11.11.2018 в 19:38
berya Дата: Понедельник, 12.11.2018, 13:30 | Сообщение № 4
Группа: Проверенные
Ранг: Новичок
Сообщений: 27
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007
Michael_S, Спасибо за подсказку - работает
 
Ответить
СообщениеMichael_S, Спасибо за подсказку - работает

Автор - berya
Дата добавления - 12.11.2018 в 13:30
Мир MS Excel » Вопросы и решения » Вопросы по VBA » ограничение длины строки в Select Case (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс цитирования
© 2010-2018 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!