СЧЁТЕСЛИ(только Кириллица ) и СЧЁТЕСЛИ(смешанный текст) - Microsoft Office Excel

0mega · 20.01.2017, 11:10

всем доброго времени суток
2007
sub no

Диапазон D1:Dn содержит текстовую информацию
Информация на кириллице - обязательно содержится во всех ячейках
В некоторых ячейках присутствует и английский текст тоже.
Надо подсчитать кол-во ячеек с русским и смешанным текстом

пример:

Смешанный текст - 2 text in cell
Только кириллица
2 текста in 1 cell
Наличие русского and english text

ответ:
Кириллица = 1
Смешанный = 3

Aleksandr H. · 20.01.2017, 11:34

только формулы или макросами можно?

0mega · 20.01.2017, 11:47

Цитата:

Сообщение от Aleksandr H.

только формулы или макросами можно?

только формулы

Цитата:

Сообщение от 0mega

всем доброго времени суток
2007
sub no

Диапазон D1:Dn содержит текстовую информацию

Hugo121 · 20.01.2017, 11:48

sub же no

Aleksandr H. · 20.01.2017, 11:57

Ну, екскьюзимуа, далёкого.

В целях ликбеза, прошу весь список аббревиатур с разшифровками.

0mega · 20.01.2017, 12:20

Цитата:

Сообщение от Aleksandr H.

... прошу весь список аббревиатур с разшифровками.

СССР
ВЛКСМ
КПСС
ТАСС
...
Эти тоже ?

Hugo121 · 20.01.2017, 12:54

Есть уже люди, которые может быть знают только первое

0mega · 20.01.2017, 13:49

Результат работы серого вещества

Код:

=СУММПРОИЗВ(НЕ(Z5:Z30)*(ПРАВБ(СЖПРОБЕЛЫ(B5:B30))<="z")*(ПРАВБ(СЖПРОБЕЛЫ(B5:B30))>="a"))

Охотно рассмотрю и другие предложения

peq · 20.01.2017, 19:55

по правому символу не уверен насколько это будет правильно.
будет строка на входе типа "ыфваф sadfkjhasdkf 1231" - вы ее отнесете к кириллице.
как вариант, можно разбить по буквам через пстр(одна буква-один столбец) и дальше уже через ascii, но в случае очень большой длины слов такой подход также не будет работать. а почему не написать пользовательскую функцию в редакторе VB?

0mega · 20.01.2017, 20:27

Цитата:

Сообщение от peq

...строка на входе типа "ыфваф sadfkjhasdkf 1231..."

в данном случае такая концовка исключена
Окончание может быть только "a-z" или случайный пробел(ы)

Цитата:

Сообщение от peq

...а почему не написать пользовательскую функцию в редакторе VB?...

Мне не надо "тарелочка с голубой кайомочкой "
Мне надо чтобы я знал и понимал .
Лично я с макросами на "Вы" и через "Пожалуйста".
"VB" - непонятное, незнакомое, неизвестное ...
Если перефразировать В.С. Высоцкого: "И кроме формул - никаких чудес"

20.01.2017, 11:34	#2
Aleksandr H. 2 the Nation Glory Старожил Регистрация: 27.05.2014 Сообщений: 3,289	только формулы или макросами можно? Кто умер, но не забыт, тот бессмертен. Лао-Цзы.

20.01.2017, 11:48	#4
Hugo121 Старожил Регистрация: 11.05.2010 Сообщений: 5,166	sub же no webmoney: E265281470651 Z422237915069 R418926282008

20.01.2017, 11:57	#5
Aleksandr H. 2 the Nation Glory Старожил Регистрация: 27.05.2014 Сообщений: 3,289	Ну, екскьюзимуа, далёкого. В целях ликбеза, прошу весь список аббревиатур с разшифровками. Кто умер, но не забыт, тот бессмертен. Лао-Цзы.

20.01.2017, 12:54	#7
Hugo121 Старожил Регистрация: 11.05.2010 Сообщений: 5,166	Есть уже люди, которые может быть знают только первое webmoney: E265281470651 Z422237915069 R418926282008

20.01.2017, 13:49	#8
0mega Форумчанин Регистрация: 12.09.2009 Сообщений: 232	Результат работы серого вещества Код: `=СУММПРОИЗВ(НЕ(Z5:Z30)(ПРАВБ(СЖПРОБЕЛЫ(B5:B30))<="z")(ПРАВБ(СЖПРОБЕЛЫ(B5:B30))>="a"))` Охотно рассмотрю и другие предложения

20.01.2017, 19:55	#9
peq Форумчанин Регистрация: 01.03.2009 Сообщений: 230	по правому символу не уверен насколько это будет правильно. будет строка на входе типа "ыфваф sadfkjhasdkf 1231" - вы ее отнесете к кириллице. как вариант, можно разбить по буквам через пстр(одна буква-один столбец) и дальше уже через ascii, но в случае очень большой длины слов такой подход также не будет работать. а почему не написать пользовательскую функцию в редакторе VB?

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
СчётЕсли по таблице	sasha_prof	Microsoft Office Access	1	12.07.2013 14:15
СЧЁТЕСЛИ	bize	Microsoft Office Excel	1	26.01.2013 01:36
СчётЕсли по 2 диапазонам	Andrey770	Microsoft Office Excel	6	25.03.2012 20:10
СчётЕсли в Access	d_adilet	Microsoft Office Access	13	08.12.2011 00:27
СЧЁТЕСЛИ	sanych_09	Microsoft Office Excel	2	01.02.2011 17:52