формула, которая скажет мне, сколько наборов 7-последовательных нулей есть в каждой строке

Question

У меня есть база данных с 300 строками и 50 столбцами.

Ячейки заполнены либо zero , one или blank .

Я ищу формулу, которую я могу вставить в столбец 51 для 300 строк, который скажет мне, сколько наборов 7-последовательных нулей есть в каждой строке.

Answer 1

Рассмотрим следующую пользовательскую функцию:

Public Function BlockCount(rng As Range) As Long
    Dim ItemCount As Long, r As Range, v As String

    BlockCount = 0
    ItemCount = 0

    For Each r In rng
        v = r.Text
        If v = "0" Then
            ItemCount = ItemCount + 1
            If ItemCount = 7 Then
                ItemCount = 0
                BlockCount = BlockCount + 1
            End If
        Else
            ItemCount = 0
        End If
    Next r

End Function

Пользовательские функции (UDF) очень просты в установке и использовании:

1. ALT-F11 открывает окно VBE
2. ALT-I ALT-M открывает новый модуль
3. вставьте материал и закройте окно VBE

Если вы сохраните книгу, UDF будет сохранен вместе с ней. Если вы используете версию Excel более поздней, чем в 2003 году, вы должны сохранить файл как .xlsm, а не .xlsx

Чтобы удалить UDF:

1. откройте окно VBE, как указано выше
2. очистить код
3. закройте окно VBE

Чтобы использовать UDF из Excel:

=BlockCount(A1:Z1)

Чтобы узнать больше о макросах в целом, смотрите:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

а также

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

а подробности о UDF смотрите в:

http://www.cpearson.com/excel/WritingFunctionsInVBA.aspx

Макросы должны быть включены, чтобы это работало!