2

У меня есть две таблицы, которые содержат разную информацию, но обе имеют поле под названием «Модель». Я хочу знать, сколько разных типов моделей в обеих таблицах.

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

=SUMPRODUCT((table[field]<>"")/COUNTIF(table[field],table[field]&""))

Однако я не могу придумать способ сделать то же самое для двух отдельных списков, которые я хочу объединить в один столбец для использования в одном уравнении?

1 ответ1

1

Попробуйте эту короткую пользовательскую функцию:

Public Function Kount(ParamArray Rng()) As Long
    Dim i As Long, r As Range, c As Collection, rr As Range

    Set c = New Collection

    On Error Resume Next
        For i = LBound(Rng) To UBound(Rng)
            Set r = Rng(i)
            For Each rr In r
                c.Add rr.Value, CStr(rr.Value)
            Next rr
        Next i
    On Error GoTo 0

    Kount = c.Count
    Set c = Nothing
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:

= MyFunction (А1)

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

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

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

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .