Исключить из массива определенные члены - VBA

Узнай цену своей работы

Формулировка задачи:

Здравствуйте! Есть массив данных arrO, есть массив ненужных членов arrE. Подскажите, пожалуйста, как сделать, что бы на выходе в массиве arrOO были все члены массива arrO, без ненужных членов. Пример:
Нужно на выходу получить : A,B,1,F Спасибо!

Решение задачи: «Исключить из массива определенные члены»

textual
Листинг программы
For m = LBound(arrO) To UBound(arrO)
    
    elem = arrO(m)
    found = False
    For t = LBound(arrE) To UBound(arrE)
        
        If elem = arrE(t) Then
            found = True
            Exit For
        End If
 
    Next
    
    If Not found Then
        
        ReDim Preserve arrOO(k)
        arrOO(k) = elem
        k = k + 1
        
    End If
    
Next

ИИ для рефератов и докладов


  • Экспорт Word по ГОСТу
  • Минимум 80% уникальности текста
  • Поиск релевантных источников в интернете
  • Готовый документ за 2 минуты

Оцени полезность:

14   голосов , оценка 4 из 5
Похожие ответы