Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Подсчёт количества определённых символов "-" в формуле ячейки
 
#1
23.11.2021 12:25:16
Подсчёт количества определённых символов "-" в формуле ячейки:
Сама формула выглядит следующим образом:
Код
=(ВРЕМЯ(2;53;0)-ВРЕМЯ(1;44;0))*24+(ВРЕМЯ(22;10;0)-ВРЕМЯ(18;38;0))*24

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

Excel office 2007/

Благодарю.
Изменено: Артём Герасимов - 23.11.2021 12:51:38
 
 
 
#2
23.11.2021 12:36:48
Вариант через пользовательскую функцию.
Код
=КОЛИЧЕСТВО_МИНУСОВ(A1)

Function КОЛИЧЕСТВО_МИНУСОВ(Ячейка As Range) As Long
    Dim s As String
    s = Ячейка.Formula
    КОЛИЧЕСТВО_МИНУСОВ = Len(s) - Len(Replace(s, "-", ""))
End Function
 
 
 
#3
23.11.2021 12:44:14
Нашел вот такое решение
Код
=ДЛСТР(Ф.ТЕКСТ(A1)) - ДЛСТР(ПОДСТАВИТЬ(Ф.ТЕКСТ(A1);"-";""))
Изменено: Andrey_S - 23.11.2021 12:44:56
 
 
 
#4
23.11.2021 12:50:26
Не работает, выдаёт в ячейке #ИМЯ?
 
 
 
#5
23.11.2021 12:55:37
Цитата
:  2007
Ф.ТЕКСТ появился в 2013-м.
 
 
 
#6
23.11.2021 12:57:27
Убрать функцию ф.текст из формулы ;)
Код
=ДЛСТР(A1) - ДЛСТР(ПОДСТАВИТЬ(A1;"-";))

Но вопрос был - считать в формуле, а не в значении
 
 
 
#7
23.11.2021 13:50:17
Цитата
написал:
1=ДЛСТР(Ф.ТЕКСТ(A1)) - ДЛСТР(ПОДСТАВИТЬ(Ф.ТЕКСТ(A1);"-";""))
В excel 2013 работает!!!
 
 
 
#8
23.11.2021 14:03:08
Вы сообщение #5 прочитали?
 
 
 
#9
23.11.2021 19:39:50
может уже и ни к месту:

Код
Function ПОДСЧЕТ_СИМВОЛОВ(what, Optional ByVal pattern = "\-")
Dim res
'  Optional ByVal pattern = "\-" - значение по умолчанию (может быть заменено на \любой знак "\(\)" - ищет открывающую и закрывающую скобку
    With CreateObject("VBScript.Regexp")
        .Global = True
        .MultiLine = True
        .pattern = pattern
        Set res = .Execute(what.Formula)
        ПОДСЧЕТ_СИМВОЛОВ = res.Count
    End With
End Function
Изменено: artemkau88 - 23.11.2021 19:41:07
 
 
 
Страницы: 1
Наверх