Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Счет кол. строк и кол. символов по строкам - Мир MS Excel

  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Счет кол. строк и кол. символов по строкам
4step Дата: Среда, 24.12.2025, 14:12 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 90
Репутация: 0 ±
Замечаний: 40% ±

Добрый день!
Возможно ли создать три формулы для определения счета текста в ячейке, как по строкам, так и по определению максимального количества символов и строк? Количество символов и строк может быть множество. Разделение строк ALT+ENTER.
Пример прилагаю.
К сообщению приложен файл: 2385017.xlsx (9.3 Kb)
 
Ответить
СообщениеДобрый день!
Возможно ли создать три формулы для определения счета текста в ячейке, как по строкам, так и по определению максимального количества символов и строк? Количество символов и строк может быть множество. Разделение строк ALT+ENTER.
Пример прилагаю.

Автор - 4step
Дата добавления - 24.12.2025 в 14:12
DrMini Дата: Среда, 24.12.2025, 15:12 | Сообщение № 2
Группа: Модераторы
Ранг: Старожил
Сообщений: 2146
Репутация: 378 ±
Замечаний: 0% ±

Excel LTSC 2024 RUS
Здравствуйте 4step.
Количество строк можно подсчитать такой формулой:
Код
=ЕСЛИ(ЕПУСТО(A2);0;ДЛСТР(A2)-ДЛСТР(ПОДСТАВИТЬ(A2;СИМВОЛ(10);""))+1)

Остальное надо будет подумать после работы.
 
Ответить
СообщениеЗдравствуйте 4step.
Количество строк можно подсчитать такой формулой:
Код
=ЕСЛИ(ЕПУСТО(A2);0;ДЛСТР(A2)-ДЛСТР(ПОДСТАВИТЬ(A2;СИМВОЛ(10);""))+1)

Остальное надо будет подумать после работы.

Автор - DrMini
Дата добавления - 24.12.2025 в 15:12
msi2102 Дата: Среда, 24.12.2025, 16:44 | Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 461
Репутация: 136 ±
Замечаний: 0% ±

Excel 2019
Можно так
количество символов, немного в другом формате, лень думать
[vba]
Код
=ОБЪЕДИНИТЬ("; "& СИМВОЛ(10);1;ЕСЛИОШИБКА(ДЛСТР(ФИЛЬТР.XML("<t><s>"&ПОДСТАВИТЬ(A4;СИМВОЛ(10);"</s><s>")&"</s></t>";"//s"));0))
[/vba]
Или так, только нужно будет последнюю точку с запятой удалить исправил
[vba]
Код
=ОБЪЕДИНИТЬ("; ";1;ЕСЛИОШИБКА(СТРОКА($1:$10)&"="&ЕСЛИОШИБКА(ДЛСТР(ФИЛЬТР.XML("<t><s>"&ПОДСТАВИТЬ(A2;СИМВОЛ(10);"</s><s>")&"</s></t>";"//s"));0);""))
[/vba]
Максимальное количество символов
[vba]
Код
=МАКС(ЕСЛИОШИБКА(ДЛСТР(ФИЛЬТР.XML("<t><s>"&ПОДСТАВИТЬ(A2;СИМВОЛ(10);"</s><s>")&"</s></t>";"//s"));0))
[/vba]
Количество строк
Код
=ДЛСТР(A2)-ДЛСТР(ПОДСТАВИТЬ(A2;СИМВОЛ(10);""))+1

все массивные
К сообщению приложен файл: 4783803.xlsx (10.0 Kb)


Сообщение отредактировал msi2102 - Среда, 24.12.2025, 17:31
 
Ответить
СообщениеМожно так
количество символов, немного в другом формате, лень думать
[vba]
Код
=ОБЪЕДИНИТЬ("; "& СИМВОЛ(10);1;ЕСЛИОШИБКА(ДЛСТР(ФИЛЬТР.XML("<t><s>"&ПОДСТАВИТЬ(A4;СИМВОЛ(10);"</s><s>")&"</s></t>";"//s"));0))
[/vba]
Или так, только нужно будет последнюю точку с запятой удалить исправил
[vba]
Код
=ОБЪЕДИНИТЬ("; ";1;ЕСЛИОШИБКА(СТРОКА($1:$10)&"="&ЕСЛИОШИБКА(ДЛСТР(ФИЛЬТР.XML("<t><s>"&ПОДСТАВИТЬ(A2;СИМВОЛ(10);"</s><s>")&"</s></t>";"//s"));0);""))
[/vba]
Максимальное количество символов
[vba]
Код
=МАКС(ЕСЛИОШИБКА(ДЛСТР(ФИЛЬТР.XML("<t><s>"&ПОДСТАВИТЬ(A2;СИМВОЛ(10);"</s><s>")&"</s></t>";"//s"));0))
[/vba]
Количество строк
Код
=ДЛСТР(A2)-ДЛСТР(ПОДСТАВИТЬ(A2;СИМВОЛ(10);""))+1

все массивные

Автор - msi2102
Дата добавления - 24.12.2025 в 16:44
msi2102 Дата: Среда, 24.12.2025, 17:46 | Сообщение № 4
Группа: Проверенные
Ранг: Обитатель
Сообщений: 461
Репутация: 136 ±
Замечаний: 0% ±

Excel 2019
В предыдущем сообщении если в строке только пробелы, то выдает количество символов 0, так можно исправить:
[vba]
Код
=ОБЪЕДИНИТЬ("; ";1;ЕСЛИОШИБКА(СТРОКА($1:$10)&"="&ЕСЛИОШИБКА(ДЛСТР(ФИЛЬТР.XML("<t><s>"&ПОДСТАВИТЬ(ПОДСТАВИТЬ(A2;" ";"|");СИМВОЛ(10);"</s><s>")&"</s></t>";"//s"));0);""))
[/vba]
К сообщению приложен файл: 4783803_1.xlsx (10.2 Kb)


Сообщение отредактировал msi2102 - Среда, 24.12.2025, 17:47
 
Ответить
СообщениеВ предыдущем сообщении если в строке только пробелы, то выдает количество символов 0, так можно исправить:
[vba]
Код
=ОБЪЕДИНИТЬ("; ";1;ЕСЛИОШИБКА(СТРОКА($1:$10)&"="&ЕСЛИОШИБКА(ДЛСТР(ФИЛЬТР.XML("<t><s>"&ПОДСТАВИТЬ(ПОДСТАВИТЬ(A2;" ";"|");СИМВОЛ(10);"</s><s>")&"</s></t>";"//s"));0);""))
[/vba]

Автор - msi2102
Дата добавления - 24.12.2025 в 17:46
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!