Программирование в VBA. Создать одномерный массив состоящий из 10 целых чисел . Сколько одинаковых чисел содержит массив . Т.е. в столбце А есть 10 чисел , а в столбце В напротив каждого числа (стобца А ) выводится число , которое показывает , сколько раз встречается данное число в столбце А .
Ответы:
15-11-2013 14:22
Sub aaa() Dim r As Range Set r = Range("A1:A10") i = 1 For Each k In r Cells(i, 2) = Application.WorksheetFunction.CountIf(r, k) i = i + 1 Next kEnd SubДля случая размещения чисел массива в ячейках с А1 по А10
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Программирование в VBA. Создать одномерный массив состоящий из 10 целых чисел . Сколько одинаковых чисел содержит массив . Т.е. в столбце А есть 10 чисел , а в столбце В напротив каждого числа (стобца А ) выводится число , которое показывает , сколько раз встречается данное число в столбце А .» от пользователя Машка Кириленко в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!