Страницы: 1
RSS
Подсчет количества совпадений в двух столбцах с условием
 
Доброго времени суток!

Имеем 2 столбца, требуется найти количество совпадений в строке, но не считая "-".
Без введения дополнительных столбцов с вычислениями.
 
вариант
Код
=СУММПРОИЗВ((C7:C14=D7:D14)*(C7:C14<>"-"))
Лень двигатель прогресса, доказано!!!
 
Благодарю)
 
Код
Sub sovpadeniay()

Dim i As Integer
Dim j As Integer
i = 0
j = 0       'счетчик совпадений
Dim sh As Worksheet
Set sh = ThisWorkbook.Worksheets("Лист1")
Do While sh.Cells(7 + i, 3) <> ""
 If sh.Cells(7 + i, 3).Value = sh.Cells(7 + i, 4).Value And sh.Cells(7 + i, 3).Value <> "-" Then
   j = j + 1
 End If
 i = i + 1
Loop

End Sub
Вот если макросом. j - количество совпадений.
Страницы: 1
Наверх