@sanik2

Задача Excel VBA скриптом?

Задача: Даны два массива. Определить, есть ли наибольший элемент массива А среди элементов массива В.
Как это сделать? Кто может делал чтот подобное?
  • Вопрос задан
  • 151 просмотр
Пригласить эксперта
Ответы на вопрос 2
AnnTHony
@AnnTHony
Интроверт
Как это сделать?

Поиск максимального элемента

Sub max_el()
    Dim i, j, max As Integer
    
    ' Cells in A
    i = 11
    
    j = 1
    max = 0
    
    While (j <= i)
        If (max < Cells(j, 1)) Then max = Cells(j, 1)
        j = j + 1
    Wend
    
    Cells(14, 1) = max
    
    ' Cells in B
    i = 11
    
    j = 1
    
    While (j <= i)
        If (max = Cells(j, 2)) Then Cells(14, 2) = "Yeap"
        j = j + 1
    Wend
    
    If Cells(14, 2) <> "Yeap" Then Cells(14, 2) = "Nope"
End Sub
Ответ написан
Комментировать
RSidorin
@RSidorin
Если массивы в ячейках, то можно и без VBA.

Одномерный массив
832a57f2b18043f0b9db1d38759f907c.png

Двумерный массив
1f12e1e6a8ef48beac5b3947404dc71c.png
Ответ написан
Комментировать
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Войти через центр авторизации
Похожие вопросы