Выброка в Екскель по буквам с помощью Vb
Как сделать выборку в Excell из ячеек по первым нескольким буквам?
например:
A1 Вася
B1 Виктор
C1 Игорь
Показать все ячейки содержащие первую букву В ?
например:
A1 Вася
B1 Виктор
C1 Игорь
Показать все ячейки содержащие первую букву В ?
Sub Макрос1()
For i = 1 To 40
Rows(i & ":" & i).Select
If Left(Range("B" & i).Value, 1) <> "В" Then
Selection.EntireRow.Hidden = True
End If
Next
End Sub
Что-то в этом роде :)
For i = 1 To 40
Rows(i & ":" & i).Select
If Left(Range("B" & i).Value, 1) <> "В" Then
Selection.EntireRow.Hidden = True
End If
Next
End Sub
Что-то в этом роде :)
А, по-моему, это значительно проще сделать с использованеим Data -> Filter -> Advanced Filter. Далее см. справку (там даже примеры есть).
Обычным автофильтром Больше "В" и меньше "Вяяяяяяя".
Цитата:
Originally posted by Cutty Sark
Обычным автофильтром Больше "В" и меньше "Вяяяяяяя".
Обычным автофильтром Больше "В" и меньше "Вяяяяяяя".
А теперь найдите автофильтром слова в которых буква В вторая или третья.
Цитата:
Originally posted by Gauss
А теперь найдите автофильтром слова в которых буква В вторая или третья.
А теперь найдите автофильтром слова в которых буква В вторая или третья.
Автофильтр "начинается с "?B" или начинается с "??В"". Автофильтр - мощная штука.
Цитата:
Originally posted by Gauss
А теперь найдите автофильтром слова в которых буква В вторая или третья.
А теперь найдите автофильтром слова в которых буква В вторая или третья.
Цитата из файла справки:
Цитата:
? (question mark) - Any single character. For example, sm?th finds "smith" and "smyth".
* (asterisk) - Any number of characters. For example, *east finds "Northeast" and "Southeast".
* (asterisk) - Any number of characters. For example, *east finds "Northeast" and "Southeast".
RTFM!
А что такое "RTFM!" ?
Цитата:
Originally posted by Cutty Sark
А что такое "RTFM!" ?
А что такое "RTFM!" ?
Ну, скажем, "читайте мануал". Было адресовано Gauss.
Цитата:
Originally posted by Ghost
Ну, скажем, "читайте мануал". Было адресовано Gauss.
Ну, скажем, "читайте мануал". Было адресовано Gauss.
2Ghost Согласен, вот только см тему поста: это надо было сделать на VB
Скорее всего вопрошающий не знал, что можно обойтись без VBA.
Ладно, хватит животами меряться. Я вот на этот форум вчера только наткнулся. Надеюсь, что помогая людям, и сам чего-нибудь от кого-нибудь новое узнаю. Жалко только маловато сюда народу ходит...
Ладно, хватит животами меряться. Я вот на этот форум вчера только наткнулся. Надеюсь, что помогая людям, и сам чего-нибудь от кого-нибудь новое узнаю. Жалко только маловато сюда народу ходит...