Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Сравнить 2 двумерных массива
 
#1
16.11.2019 21:41:48
Здравствуйте, существует 2 двумерных массива вида:
1100
2200
3300
и
1400
5500
3300
Как их сравнить, чтобы в результате получился новый массив с данными
1400
5500
при условии, что (A(i,0) <> B(i,0) И A(i,1) <> B(i,1)) ИЛИ  (A(i,0) = B(i,0) И A(i,1) <> B(i,1)).
Т.е. значения либо вообще не должны совпасть, либо из 1-й колонки может совпасть, а из 2-й - Нет.
Изменено: Samyrro054 - 18.11.2019 00:38:44
 
 
 
#2
16.11.2019 22:24:17
PQ
Код
 let
    from1 = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    from2 = Excel.CurrentWorkbook(){[Name="Таблица2"]}[Content],
    to = Table.NestedJoin(from1,{"Столбец1", "Столбец2"},from2,{"Столбец1", "Столбец2"},"temp",JoinKind.LeftAnti)[[Столбец1], [Столбец2]]
in
    to
Соблюдение правил форума не освобождает от модераторского произвола
 
 
 
#3
16.11.2019 22:50:46
buchlotnik,благодарю, а как это реализовать на vba?
 
 
 
#4
18.11.2019 00:09:04
Цитата
Samyrro054 написал:
Т.е. значения либо вообще не должны совпасть
А эта строка чем провинилась?
1 100      7 700
Код
Sub Макрос2()
    A = Range("A1:B10")
    B = Range("D1:E10")
    n = 1
    For i = 1 To UBound(A)
        If (A(i, 1) <> B(i, 1) And A(i, 2) <> B(i, 2)) _
           Or (A(i, 1) = B(i, 1) And A(i, 2) <> B(i, 2)) Then
            Range("f" & n) = B(i, 1)
            Range("g" & n) = B(i, 2)
            n = n + 1
        End If
    Next
End Sub
Изменено: doober - 18.11.2019 00:14:43
 
 
 
#5
18.11.2019 07:18:53
а еще и кросс
Изменено: БМВ - 18.11.2019 07:19:07
По вопросам из тем форума, личку не читаю.
 
 
 
Страницы: 1
Наверх