0 / 0 / 0
Регистрация: 27.04.2007
Сообщений: 7
|
||||||
1 | ||||||
Помогите доделать макрос (рабочий диапазон, функция и т.п.)27.04.2007, 09:00. Показов 3492. Ответов 14
Метки нет (Все метки)
Народ помогите пожалуйста
Есть такой макрос:
Например, есть часть столбца A1:A20, в нем расположены числа сверху вниз от A1 до A7, и выводиться на экран следующая запись: "5 (3)", что значит 5-последнее значение, (3)-3 пятерки подряд 1 2 3 4 5 5 5 Но он работает только в столбце A, и считает только числовые значения, а диапзонов где его надо применить много. Надо его переделать в функцию и чтоб считал также текстовые данные, и еще чтобы можно было указывать рабочий дипазон.
0
|
27.04.2007, 09:00 | |
Ответы с готовыми решениями:
14
Доделать макрос Как доделать макрос? Рабочий макрос не работает Заложить в макрос выделенный диапазон на листе |
85 / 61 / 69
Регистрация: 15.03.2007
Сообщений: 6,906
|
|
27.04.2007, 13:42 | 2 |
<STRONG>[вопрос перенесен в форум по VBA]</STRONG>
0
|
996 / 355 / 135
Регистрация: 27.10.2006
Сообщений: 764
|
|
27.04.2007, 17:55 | 3 |
Если только для цифр, то
=МОДА(E14:E20) & " (" & СЧЁТЕСЛИ(E14:E20;МОДА(E14:E20))&")" где E14:E20 ваш диапазон P.S. =МОДА(Данные) - ищет часто встречаемое число =СЧЁТЕСЛИ(Данные;МОДА(Данные)) - сколько раз оно повторялось
0
|
996 / 355 / 135
Регистрация: 27.10.2006
Сообщений: 764
|
||||||
27.04.2007, 18:45 | 4 | |||||
а так не пойдёт ? ))
0
|
0 / 0 / 0
Регистрация: 27.04.2007
Сообщений: 7
|
||||||
27.04.2007, 22:40 [ТС] | 5 | |||||
А МОДА не подходит, делает не то ( должно определяться нижнее (текущее) значение, и так чтобы, считалось бы количество рядомстоящих одинаковых значений равных нижнему)
0
|
996 / 355 / 135
Регистрация: 27.10.2006
Сообщений: 764
|
||||||
27.04.2007, 23:25 | 6 | |||||
а так ? )
[.code] .... ВАШ КОД... [./code] только без точек, которые я написал внутри квадратных скобок (они для того, чтобы вы увидели эти скобки сейчас)
0
|
0 / 0 / 0
Регистрация: 27.04.2007
Сообщений: 7
|
|
28.04.2007, 08:18 [ТС] | 7 |
Теперь функция работает, но только если рабочий дипазон заполнен полностью.
Извиняюсь ,по ходу я нет так обьяснил что нужно сделать: Эта функция должна работать по мере заполнения дипазона сверху вниз, с каждым новым введеным значением должно проверяться наличие сверху рядомстоящих одинаковых значений. Если в рабочем дипазоне нет значений, то в результирующей ячейке должно быть пусто.
0
|
996 / 355 / 135
Регистрация: 27.10.2006
Сообщений: 764
|
||||||
28.04.2007, 15:27 | 8 | |||||
А так ? )
P.P.S. у мя закончился интернет на работе, если что, смогу ответить только из дома после 9 вечера )
0
|
0 / 0 / 0
Регистрация: 27.04.2007
Сообщений: 7
|
|
29.04.2007, 21:32 [ТС] | 9 |
Вообщем работает,но для некоторых дипазонов считает правильно, а для других неправильно.
0
|
996 / 355 / 135
Регистрация: 27.10.2006
Сообщений: 764
|
|
30.04.2007, 02:31 | 10 |
Т.е в примере:
да да да да нет да ответ должен быть - да (1) ? т.е. считаем кол-во последнего элемента снизу вверх до первого несовпадения (в данном случае слова - нет) ? А я думал в этом примере ответ должен быть да (4). Я ошибался? ) P.S. кстати ваш макрос в вашем первом посте на примере цифр 5 5 5 5 7 5 даёт результат 5(4), т.е. этот результат неверный? Просто я не переделывал логику вашего макроса, я лишь переделал, чтобы он ещё обрабатывал нужный диапазон и текстовые значения. Логику я просто скопировал из вашего макроса. А теперь получается, что вы хотите другую логику посчёта. Я немного запутался )
0
|
0 / 0 / 0
Регистрация: 27.04.2007
Сообщений: 7
|
|
30.04.2007, 02:49 [ТС] | 11 |
Походу мне изначально сделали неправильную логику
да да да да нет да Должно быть да (1) считаем кол-во последнего элемента снизу вверх до первого несовпадения (в данном случае слова - да) а здесь 5 5 5 5 7 5 Должно быть 5(1)
0
|
996 / 355 / 135
Регистрация: 27.10.2006
Сообщений: 764
|
||||||
30.04.2007, 05:59 | 12 | |||||
а вот так ? )
0
|
0 / 0 / 0
Регистрация: 27.04.2007
Сообщений: 7
|
|
01.05.2007, 05:08 [ТС] | 13 |
Сейчас вроде все работает, но только значения 0 не считает
0
|
996 / 355 / 135
Регистрация: 27.10.2006
Сообщений: 764
|
||||||
01.05.2007, 05:24 | 14 | |||||
А вот так ? )
0
|
0 / 0 / 0
Регистрация: 27.04.2007
Сообщений: 7
|
|
05.05.2007, 09:39 [ТС] | 15 |
Спасибо все работает)
0
|
05.05.2007, 09:39 | |
05.05.2007, 09:39 | |
Помогаю со студенческими работами здесь
15
Доделать макрос поиска слов в фразах Удаление лишних строк - доделать макрос Доделать макрос разбора htm файла Макрос сохраняющий определенный диапазон страниц в pdf файл Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |