Программирование в VBA . Помогите создать (исправить) программу , которая будет сравнивать в таблице Excel числа в столбце "A" и в столбце "B" и выводить наибольшие числа в столбец "С". (Надеюсь , я понятно объяснил) Вот код моей программы ( Но у меня она не захотела работать :-( ) Sub m1() Dim j As Integer, i As Integer, x(10) As Integer For i = 1 To 10 For j = 1 To 10 x(i) = Cells(i, "A") x(j) = Cells(j, "B") If x(i) > x(j) and i=j Then x(i) = Cells(i, "C") End Next j Next i End Sub

Ответы:

ВАЛИК СМОЛЯР

23-11-2013 17:58

Sub m1() Dim i As Integer, m As Integer, n As Integer For i = 1 To 10 m = Cells(i, 1) n = Cells(i, 2) If m > n Then Cells(i, 3) = m Else Cells(i, 3) = n End If Next iEnd Sub

Также наши пользователи интересуются:

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Программирование в VBA . Помогите создать (исправить) программу , которая будет сравнивать в таблице Excel числа в столбце "A" и в столбце "B" и выводить наибольшие числа в столбец "С". (Надеюсь , я понятно объяснил) Вот код моей программы ( Но у меня она не захотела работать :-( ) Sub m1() Dim j As Integer, i As Integer, x(10) As Integer For i = 1 To 10 For j = 1 To 10 x(i) = Cells(i, "A") x(j) = Cells(j, "B") If x(i) > x(j) and i=j Then x(i) = Cells(i, "C") End Next j Next i End Sub» от пользователя Дарья Кононенко в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!