Обработка строк на VBA

[AnatolyF]

Всем привет, кто может объяснить (или хотя бы подтолкнуть) решение данной задачи: В текстовом файле подсчитать количество предложений, состоящих более чем из пяти слов.

[Казанский]

А по какой теме задача - по работе со строками или по регулярным выражениям?

[IgorGO]

function CountMore5Words(t as string) as long
  dim c as long, s as string
  c = 0
  for each s in split(t, ".")
    if ubound(split(s)) > 5 then c = c + 1
  next
  CountMore5Words = c
end function

[Казанский]

Предложение обязано заканчиваться точкой? Может и восклицательным знаком!

[IgorGO]

согласен))

function CountMore5Words(byval t as string) as long
  dim c as long, s as string
  c = 0: replace(t, "!", "."): replace(t, "?", ".")
  ...

[nerv]

За столом сидели: Иванов А.В., Петров В.Г., Сидоров А.К. Мужики пили пиво.

[IgorGO]

снова согласн.
пиво по 5.50 (5 грн. 50 коп) - еще одни данные, которые разделят одно предложение на два. общепринятые сокращения шт., т.е., и т.д и многое многое другое.

я даже не программно не берусь сказать есть ли в этом коротком рассказе

За столом сидели: Иванов А.В., Петров В.Г., Сидоров А.К. Мужики пили пиво.

хоть одно предложение длинной более 5 слов (вроде есть, но согласно предложенного мною алгоритма - нет).

писать программы, не видя данных, не имея представления о их структуре - утопия. А учебная функция - вполне реальное дело.