Фильтр по строк число букв

Вход

Регистрация

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

= Мир MS Excel/Фильтр по строк число букв - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Фильтр по строк число букв (Макросы/Sub)

Фильтр по строк число букв

Enix

Дата: Понедельник, 04.12.2017, 17:58 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 25

Репутация: 0 ±

Замечаний: 60% ±

Excel 2007

В ячейки A1 до A100000 строку есть разный слово например
абонент
борт
авария
мы
они
……..и так далее
нужна макрос по фильтрование по определенному число букв например при использование макрос в ячейки A1 до A100000 сортировал следующим образом
мы
они
борт
авария
абонент
….. так далее

Ответить

Kuzmich

Дата: Понедельник, 04.12.2017, 22:21 | Сообщение № 2

Группа: Проверенные

Ранг: Ветеран

Сообщений: 711

Репутация: 156 ±

Замечаний: 0% ±

Excel 2003

Цитата

нужна макрос

[vba]

Код

Sub Tablica()
Dim i As Long
Dim iLastRow As Long
iLastRow = Cells(Rows.Count, 1).End(xlUp).Row
  For i = 1 To iLastRow
    Cells(i, 2) = Len(Cells(i, 1))
  Next
  Range("A1:B" & iLastRow).Sort Key1:=Range("B1"), Header:=xlNo
End Sub

[/vba]

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Фильтр по строк число букв (Макросы/Sub)

Страница 1 из 1
1