Как указать диапазон значений в Excel?

Question

У меня есть отчет о Excel, который содержит две колонки 'Site Name' и 'Asset IP Address'. Я загрузил образец отчета here. Мне нужен отчет, который показывает мне IP диапазон по территории, как это:

1. Оценка сайт 1 192.0.2.134 - 192.0.2.201
2. Оценка сайт 2 192.0.2.203 - 192.0.2.250 и так далее

Я пробовал использовать VLOOKUP и CountIF, но я не могу выполнить эту работу. Любые предложения наиболее ценятся. Заранее спасибо.

Answer 1

Если вы хотите чисто формульное решение, то, предположив, что вы положили, например, Оценка сайта 1 в E2, это массив формула ** в F2:

= ИНДЕКС ($ B $ 2: $ B $ 33, MATCH (MIN (ЕСЛИ ($ A $ 2: $ A $ 33 = E2,0 + ПОДСТАВИТЬ ($ B $ 2: $ B $ 33, " """))), ЕСЛИ ($ A $ 2: $ A $ 33 = E2,0 + ПОДСТАВИТЬ ($ B $ 2: $ B $ 33, "",» ")), 0)) &" - "& ИНДЕКС ($ B $ 2: $ B $ 33, MATCH (MAX (IF ($ A $ 2: $ A $ 33 = E2,0 + SUBSTITUTE ($ B $ 2: $ B $ 33, ".", ""))), IF ($ A $ 2: $ A $ 33 = E2,0 + SUBSTITUTE ($ B $ 2: $ B $ 33, ".", "")), 0))

Копирование вниз даст аналогичные результаты для Сайты, перечисленные в E3, E4 и т. Д.

С уважением

** Формулы массива не вводятся так же, как «стандартные» формулы. Вместо нажатия только ENTER, сначала удерживайте CTRL и SHIFT, а затем нажмите ENTER. Если вы сделали это правильно, вы заметите, что Excel помещает фигурные скобки {} вокруг формулы (хотя не пытайтесь вручную вставить их самостоятельно).

Answer 2

У меня есть решение на ваш вопрос. Вы знаете VBA ?? Шаг 1: Вы нажимаете Alt + F11, чтобы отобразить редактор VBA Шаг 2: Выберите меню Insert/Module Шаг 3: Выберите меню Вставка/Процедура - Имя: введите 'FindIP' - В групповом поле Тип выберите функцию Нажмите OK Шаг 4: Введите этот код:

Public Function FindIP(SiteName As String, SiteNameRange As Range, IPRange As Range) As String 
Dim RangeOfIP As String 
RangeOfIP = "" 
For i = 1 To SiteNameRange.Rows.Count 
    If (SiteNameRange.Cells(i, 1).Value = SiteName) Then 
     RangeOfIP = RangeOfIP + IPRange.Cells(i, 1).Value + " - " 
    End If 
Next i 
FindIP = RangeOfIP 
End Function 

Шаг 5: Закрыть VBA Editor Шаг 6: Копировать столбец сайта Имя и удалить дубликаты (Data/Удалить Дубликаты) Шаг 7: Право каждого Название сайта Пункт, тип функция FindIP (SiteNameItem, SiteNameRange, IPRange)