Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » aib1984aib
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Просуммировать значения с учетом частоты параметра
 
#
28.11.2014 12:56:23
JayBhagavan, исправил, спасибо еще раз!
 
Перейти    
Просуммировать значения с учетом частоты параметра
 
#
28.11.2014 11:54:31
JayBhagavan, спасибо! Супер! Немного поменял, чтобы автоматически диапазон изменялся при изменении количества строк (пустых не будет), получилось так, все работает. Огромное спасибо!
Код
=СУММПРОИЗВ(ДВССЫЛ("$E$2:E"&СЧЁТЕСЛИ($E:$E;">"&0)+1);1/СЧЁТЕСЛИ(ДВССЫЛ("$D$2:$D"&СЧЁТЕСЛИ($E:$E;">"&0)+1);ДВССЫЛ("$D$2:$D"&СЧЁТЕСЛИ($E:$E;">"&0)+1)))
 
Перейти    
Просуммировать значения с учетом частоты параметра
 
#
28.11.2014 11:35:35
Добрый день!

В столбце A повторяющиеся значения (входят от одного до 4 раз), в столбце B - количество для указанного значения (при повторах значения в A - значения в B равные). Помогите, плз, формулой (желательно одной) посчитать сумму B без учета повторов в A. Т.к. это часть таблицы - удалять дубликаты невозможно, макрос тоже не подойдет, т.к. они отключены. Пример приложен. Заранее спасибо.
Изменено: aib1984aib - 28.11.2014 11:45:16
 
Перейти    
Получить числовое значение из ячейки
 
#
31.10.2014 12:35:11
JayBhagavan, понял, спасибо!
 
Перейти    
Получить числовое значение из ячейки
 
#
31.10.2014 11:49:37
Юрий М, абзацы выделяются одним, но если Вы рекомендуете писать через 2-3 - в следующий раз так и сделаю.

Владимир, JayBhagavan, спасибо за помощь.
 
 
Перейти    
Получить числовое значение из ячейки
 
#
31.10.2014 11:15:08
В общем, не понимаю почему, но вот так заработало (после добавления Or m(i) = 100). Может кто-то сможет объяснить в чем дело...
Код
Function imax(r)
 r = Replace(r, "%", "")
 m = Split(r, " ")
 imax = 0
 For i = 0 To UBound(m)
 m(i) = IIf(IsNumeric(m(i)), m(i), 0)
 imax = IIf(imax < m(i) Or m(i) = 100, m(i), imax)
  Next i
End Function
 
Перейти    
Получить числовое значение из ячейки
 
#
31.10.2014 11:05:28
JayBhagavan, посмотрите значение в С6, должно быть 1, а дает 0,3.
У меня та же проблема с кодом - не понимаю, почему второе значение не обрабатывается.  При этом в С3- нормально.   :(  
Код
Function imax(r)
 r = Replace(r, "%", "")
 m = Split(r, " ")
 imax = 0
 For i = 0 To UBound(m)
 m(i) = IIf(IsNumeric(m(i)), m(i), 0)
     imax = IIf(imax > m(i), imax, m(i))
  Next i

End Function
Изменено: aib1984aib - 31.10.2014 12:47:39
 
Перейти    
Получить числовое значение из ячейки
 
#
31.10.2014 10:48:44
Владимир, спасибо, почему-то не сработало в ячейке с значением, содержащем 3%.
Изменено: aib1984aib - 31.10.2014 10:52:21
 
Перейти    
Получить числовое значение из ячейки
 
#
31.10.2014 10:22:45
Цитата
JayBhagavan пишет: какова постановка...
Мда... Думал ведь, когда формулировал тему, что хотелось бы в VBA, но так и не написал...  :(
 
Перейти    
Получить числовое значение из ячейки
 
#
31.10.2014 10:15:02
JayBhagavan, безусловно. Но это постоянная ручная работа, которой как раз хотелось бы избежать.
 
Перейти    
Получить числовое значение из ячейки
 
#
31.10.2014 09:51:38
Добрый день.
Уважаемые форумчане, нужна ваша помощь.
Ежемесячно генерируется отчет, содержащий в одном из столбцов текстовое поле. В этом текстовом поле содержится число (может быть несколько). Помогите получить максимальное число из содержащихся в ячейке.
Пример на скрепке.

Заранее спасибо.
 
Перейти    
переделать формулу соответствия - перечислить все значения через запятую
 
#
21.09.2013 20:17:59
Это с какой формулой?
Можно файл? С формулой из #8 такого быть не должно.
 
Перейти    
Удалить последний знак в ячейке если это запятая
 
#
21.09.2013 20:01:44
Из справки Excel:
Цитата
Функция ПСТР возвращает заданное число знаков из текстовой строки, начиная с указанной позиции.
Функция ПРАВСИМВ возвращает последний символ или несколько последних символов текстовой строки на основе заданного числа символов.
Функция ЛЕВСИМВ возвращает первый символ или несколько первых символов текстовой строки на основе заданного числа символов.
Изменено: aib1984aib - 21.09.2013 20:02:27
 
Перейти    
Удалить последний знак в ячейке если это запятая
 
#
21.09.2013 19:47:59
Код
=ЕСЛИ(ПРАВСИМВ(A1;1)=",";ЛЕВСИМВ(A1;ДЛСТР(A1)-1);A1)
Изменено: aib1984aib - 21.09.2013 19:49:44 (Добавил проверку на запятую)
 
Перейти    
переделать формулу соответствия - перечислить все значения через запятую
 
#
21.09.2013 19:27:33
Цитата
Да, на запятую надо встраивать отдельные условия, формула существенно длиннее будет.
Оказалось, можно проще...
Код
=ЕСЛИ(И(ЕСЛИОШИБКА(ПОИСК("large";$A$1);0)>0;ЕСЛИОШИБКА(ПОИСК("w.lid";$A$1);0)+ЕСЛИОШИБКА(ПОИСК("with tap";$A$1);0)=0)=ИСТИНА;"Большой размер";ЕСЛИ(ЕСЛИОШИБКА(ПОИСК("large";$A$1);0)>0;"Большой,";""))&ЕСЛИ(ЕСЛИОШИБКА(ПОИСК("large";$A$1);0)>0;" ";"")&ЕСЛИ(ЕСЛИОШИБКА(ПОИСК("w.lid";$A$1);0)>0;"С краником";"")&ЕСЛИ(ЕСЛИОШИБКА(ПОИСК("w.lid";$A$1);0)*ЕСЛИОШИБКА(ПОИСК("with tap";$A$1);0)>0;", ";"")&ЕСЛИ(ЕСЛИОШИБКА(ПОИСК("with tap";$A$1);0)>0;"С крышкой";"")


Цитата
У меня 39 соответсвий в формуле будет.. если еще и формула одной будет длинная то excel сойдет с ума и я при составлении такой формулы  
Ну, тогда нужно пересматривать исходные данные, вполне возможно, что можно все намного проще сделать...  :)
Изменено: aib1984aib - 21.09.2013 19:35:48
 
Перейти    
переделать формулу соответствия - перечислить все значения через запятую
 
#
21.09.2013 19:22:21
Цитата
с $A$1 формула не растягивалась почему-то, поменял на А1 и заработало. Принцип правильный только мне надо чтобы они шли через запятую ато вышло "Большой С краником С крышкой"
Да, на запятую надо встраивать отдельные условия, формула существенно длиннее будет.
Rustem, будут лишние запятые, если предмет просто С крышкой, но без краника...  :)
 
Перейти    
переделать формулу соответствия - перечислить все значения через запятую
 
#
21.09.2013 19:04:06
Код
=ЕСЛИ(И(ЕСЛИОШИБКА(ПОИСК("large";$A$1);0)>0;ЕСЛИОШИБКА(ПОИСК("w.lid";$A$1);0)+ЕСЛИОШИБКА(ПОИСК("with tap";$A$1);0)=0)=ИСТИНА;"Большой размер";ЕСЛИ(ЕСЛИОШИБКА(ПОИСК("large";$A$1);0)>0;"Большой";""))&ЕСЛИ(ЕСЛИОШИБКА(ПОИСК("large";$A$1);0)>0;", ";"")&ЕСЛИ(ЕСЛИОШИБКА(ПОИСК("w.lid";$A$1);0)>0;"С краником";"")&ЕСЛИ(ЕСЛИОШИБКА(ПОИСК("w.lid";$A$1);0)>0;", ";"")&ЕСЛИ(ЕСЛИОШИБКА(ПОИСК("with tap";$A$1);0)>0;"С крышкой";"")


Может быть местные гуру подскажут, как это сделать короче и проще.
Изменено: aib1984aib - 21.09.2013 19:08:56 (Добавил запятые в формулу.)
 
Перейти    
Как быстро найти ошибку в большой формуле ?
 
#
21.09.2013 17:01:43
Цитата
вопрос был - как? мне тоже интересно :)
Честно говоря, абсолютно "в лоб" :( посмотрел, что формула состоит из независимых блоков ЕСЛИ(), скопировал в excel и бинарно разделяя нашел ошибку т и запостил. ТС-у лучше реорганизовать исходные данные, чем использовать такую формулу, малейшее изменение структуры и все заново переписывать...
 
Перейти    
Как быстро найти ошибку в большой формуле ?
 
#
21.09.2013 13:31:35
Код
ЕСЛИ(I1630="UAHWMR";(B1630*F1630-(D1630+D1630*0,008)/G1630;"0")

Количество скобок не совпадает.

P.S. Даже страшно, что за задача требует такую формулу и не может быть решена другими методами.
 
Перейти    
ВПР половину считает, половину нет, ВПР правильно выдает только 16 первых значений
 
#
20.09.2013 13:22:26
Пример прикрепите.
 
Перейти    
заполнение смежных ячеек по анализу цвета основных
 
#
20.09.2013 09:27:24
Ну, хозяин-барин.
Тогда можете поставить PLEX (там есть функция анализа цвета заливки), можете воспользоваться файлом из ответа 2, там функция уже привязана к вашему цвету (зеленому), работает для анализа 1-й ячейки.
 
Перейти    
Может ли функция запустить процедуру?
 
#
20.09.2013 09:20:26
Цитата
Для чего это нужно: функция не может влиять на свойства ячейки (?). Функцией запускаю процедуру и закрашиваю нужную ячейку.
А как Вы это представляете? Ну, по шагам, с учетом включенного автопересчета функций в excel.
 
Перейти    
Как преобразовать строки в рядки по критерию
 
#
20.09.2013 09:17:01
Цитата
Владимир, можете написать полностью вашу функцию, а то ее на скриншоте видно не всю
Ну, Вы же тоже пример картинкой прикрепили, а не таблицей.
 
Перейти    
заполнение смежных ячеек по анализу цвета основных
 
#
18.09.2013 13:30:46
Непонятно, почему F5:H5 желтые.
В остальном пример.
Зачем к цвету привязываться? Встроенными средствами excel его анализировать не умеет.
 
Перейти    
Вынос данных на другую страницу при нажатии на кнопку
 
#
18.09.2013 13:10:05
Вот пример. Переносятся данные ФИО и тип ТС. Макрос в коде листа.
 
Перейти    
Защита строки макросом при помощи Chekbox, Помогите в простом разобраться
 
#
17.09.2013 17:21:25
Попробуйте так.

Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Cells.Count > 1 Then Exit Sub
        If Not Intersect(Target, Range("A2:A100")) Is Nothing Then
            Target.Font.Name = "Marlett"
            If Target = vbNullString Then
                Target = "a"
            Else
                Target = vbNullString
            End If
        End If
        If Not Intersect(Target, Range("B2:K100")) Is Nothing Then
            If Cells(Target.Row, 1).Value = "a" Then
                Cells(Target.Row, 1).Activate
                Cells(Target.Row, 1).Value = "a"
                End If
        End If
End Sub

 
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("A2:A100")) Is Nothing Then
        Cancel = True
        Target.Font.Name = "Marlett"
            If Target = vbNullString Then
                Target = "a"
            Else
                Target = vbNullString
            End If
    End If
End Sub
 
Перейти    
ВПР по 3 условиям (легкий)
 
#
10.09.2013 16:50:00
А как Вы ТЗ своим программистам поставили?

В Вашем примере:
1. У объекта № 100 2 записи с типом Ремонт со статусом Выполнена, а если статусы будут разные, что выводить?
2. У объекта № 100 2 записи с типом Обслуживание 2 со статусом Выполнена и Согласование, выведено в итоге Согласование, а куда делось Выполнена?
3. Можно ли проводить работы в другие даты? И не для всех объектов? Например, провести Ремонт 16/06 только для объекта 100?

Или программисты должны сами решить?

По поводу выделения только основных работ посмотрите пример.
 
Перейти    
Точность хранения данных, Отклонение в 10-м знаке
 
#
10.09.2013 13:09:57
Только ОКРУГЛ()

Михаил, спасибо!
 
Перейти    
Точность хранения данных, Отклонение в 10-м знаке
 
#
10.09.2013 12:59:39
Мда. Помогло. Спасибо.

1. А почему ОТБР(А1;2) не дает результата?
Вот я идиот. ОТБР() отбрасывает целую часть и оставляет дробную, а я читаю, что остается целая, а отбрасывается дробная.
2. Почему, если я вручную ввожу 2101773,19, формула =A26-ОТБР(A26) дает результат 0,189999999944121?

Откуда вообще возникает это расхождение? Как защититься от него в дальнейшем?
 
Перейти    
Точность хранения данных, Отклонение в 10-м знаке
 
#
10.09.2013 12:42:06
Добрый день.

Столкнулся с такой проблемой. Есть некоторое количество данных с точностью 2 знака после запятой, по которым производится суммирование. Сумма должна быть 0.00, но откуда-то возникает отклонение в 10-14 знаке после запятой. Это приводит к тому, что сумма отлична от нуля в 9-м знаке. Это было бы не страшно, если бы эти данные в шаблоне не подавались в бухгалтерию, для которых "должно быть 0, у вас что-то неверно". То, что введенные данные неверны определяется формулой типа =ЕСЛИ(СУММ(A1:A97)<>0;1;0).

Уже перепробовал все, что мог придумать (умножал на 1, использовал =ОТБР(A1;2), перезабивал вручную, копировал в блокнот и вставлял из блокнота, менял форматы), но победить эти отклонения не могу.

Наверное, это решается как-то просто, но я победить эти машинные отклонения не могу. Просьба подсказать, что нужно сделать.

При этом =ОТБР(A1) избавляет от этих остатков, переводя, по-видимому в формат целое, а =ОТБР(A1;2) или =ОТБР(A1*100)/100 не помогают.

Пример во вложении.
 
Перейти    
Страницы: 1
Наверх