 |
on-line-teaching.com Онлайн курсы MS Office: Word, Excell. Как сделать сайт: HTML, JS, PHP
|
Предыдущая тема :: Следующая тема
|
Автор |
Сообщение |
jizoff Prizivnik - draftee

Зарегистрирован: 23.12.2006 Сообщения: 1
|
Добавлено: Сб Дек 23, 2006 2:48 am Заголовок сообщения: Как посчитать вхождение символа? |
|
|
Помогите пожалуйста с решением следующей задачи:
Дан диапазон ячеек, содержащих текст, в данном диапазоне нужно посчитать с помощью функций вхождение символа «а».
Заранее спасибо! |
|
Вернуться к началу |
|
 |
AsIs captain


Зарегистрирован: 27.01.2006 Сообщения: 250 Откуда: СПб
|
Добавлено: Пт Янв 12, 2007 5:38 pm Заголовок сообщения: Re: Как посчитать вхождение символа? |
|
|
jizoff писал(а): | Помогите пожалуйста с решением следующей задачи:
Дан диапазон ячеек, содержащих текст, в данном диапазоне нужно посчитать с помощью функций вхождение символа «а».
Заранее спасибо! |
Например написать собственную, пользовательскую функцию. КАк-то так:
Код: | Public Function CountChar(symbol As String, source As Range) As Integer
Dim i As Integer
Dim res As Integer
Dim c As Range
For Each c In source
For i = 1 To Len(c.Value)
If symbol = Mid(c.Value, i, 1) Then res = res + 1
Next
Next
CountChar = res
End Function
|
А потом вызывать ее в ячейке на рабочем листе:
Код: | =CountChar("а";A1:A100) |
|
|
Вернуться к началу |
|
 |
|
|
Вы не можете начинать темы Вы не можете отвечать на сообщения Вы не можете редактировать свои сообщения Вы не можете удалять свои сообщения Вы не можете голосовать в опросах
|
|