Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Центр помощи > [VBA(Excel)] Работа с массивом и ячейками

Автор: Стасон 23.6.2008, 19:31

Просуммировать положительные и отрицательные числа в массиве А(1),А(2),…,А(20). Записать полученные суммы в ячейки В1 и В2. Написать программу.

Автор: dsapa 24.6.2008, 06:50

Код


Sub Sum()
Dim i As Integer
    For i = 1 To 20
        If Cells(i, 1).Value >= 0 Then
            Cells(1, 2).Value = Cells(1, 2).Value + Cells(i, 1).Value
        Else
            Cells(2, 2).Value = Cells(2, 2).Value + Cells(i, 1).Value
        End If
    Next
End Sub

Удачи!

Автор: Delfi 22.5.2009, 07:53

[Visual Basic]
[VBA(Excel)] Работа с массивами
Определить порядковые номера нулей в массиве. Написать программу

Автор: neic 22.5.2009, 16:20

Цитата(Delfi @ 22.5.2009, 07:53

)

Определить порядковые номера нулей в массиве. Написать программу

Как бы 1 вопрос на 1 тему.

А так:

Код


For i = 1 to 20
      If masiv(i) = 0 then
          nomera = nomera & " " & i
      end if
Next

msgbox "Порядковые номера нулей:" & nomera

Автор: Delfi 26.5.2009, 13:59

Вновь обращаюсь к Вам! Помогите, пожалуйста, написать программу.
[Visual Basic]
Найти порядковый номер минимального числа в массиве.

Автор: neic 26.5.2009, 21:10

Цитата(Delfi @ 26.5.2009, 13:59

)

Ответил в другой теме

Автор: Kucheryavy 19.7.2010, 15:14

подскажите пожалуйста - необходима программа которая из отфильтрованных значений в автофильтре Excell копировала бы соответственно эту строку (или диапазон полученных строк) в некую определенную строку (может на отдельном листе), с определенным номером строки, чтобы ее было можно использовать в дальнейших вычислениях. Проблема в том, что результаты фильтрации мы не можем никак использовать и необходимо вручную копировать их, что неудобно.

Автор: Sanaff 26.7.2010, 19:48

Цитата(Kucheryavy @ 19.7.2010, 13:14)

Если применяемый фильтр конкретный - то его легче написать целиком как макрос.
если надо для любой фильтрации - то можно написать программу, чтобы копировала только содержимое строк, высота которых > 0 (у скрытых строк высота = 0)

Автор: Alekseii 29.9.2010, 15:11

Здравствуйте, помогите написать программу на VBA (Excel),
смысл которой заключён в следующем: Excell на 1 листе
вставляются данные по ширине всей строки, на этом же листе
присутствует кнопка запускающая макрос копирующий содержание
данных строки на 2 лист в следующую пустую строку.