Подсчёт символов

[Forteli]

Привет!
Столкнулся с такой задачей - необходимо подсчитать количество символов в поле с типом данных "длинный текст". Например, есть такая форма:

Надо, чтобы в столбце "количество" автоматически считалось количество из столбца "рапортов". Условно, это поиск символа "№" и подсчёт их количества. Подскажите, есть ли способ такого подсчёта (пытался всякими функциями типа Dcount и Iif, но не сумел)?
Архив с примером БД в приложении.

[Aleksandr H.]

Вариант.
Пишем UDF

Function NCount(rec As Long)
    Dim i As Long, s As String
    Dim sSql As String
    Dim rs As DAO.Recordset
    sSql = "Select [Рапорты] from Таблица1 WHERE Код=" & rec
    Set rs = CurrentDb.OpenRecordset(sSql)
    i = 0
    s = rs(0)
    Do While InStr(s, "№") > 0
        i = i + 1
        s = Mid(s, InStr(s, "№") + 1, Len(s))
    Loop
    NCount = i
    Set rs = Nothing
End Function

Запускаем запрос

SELECT 
Таблица1.Код, 
Таблица1.ФИО, 
Таблица1.Рапорты, 
NCount([Код]) AS КоличествоN
FROM Таблица1;

[Forteli]

Александр, спасибо большое! Через запрос удалось. Ещё нашёл способ (тоже через запрос), вычитанием из всей длины массива длинны без необходимого символа:
Len([Рапорты])-Len(Replace([Рапорты];"№";""))

[Aleksandr H.]

Ааааа!!! точняк, это была первая мысля, но что-то отвлекло меня и нагородил костыля