Добрый день!
Прошу вашей помощи в создании формулы массива.
Эксель 2007
Файл для примера прикладываю.
На разных складах разное количество товара по разным закупочным ценам.
Мне нужно найти среднюю цену за штуку, учитывая количества с разными ценами.
В последнем столбце, выделенным зеленым, я отразил правильные значения.
Колонки, выделенные розовым - не нужны, я их отразил вам для примера.

То есть, берем один товар, чтобы получить нужное значение: нужно перемножить сначала количества и цену по каждому складу, суммировать полученные цены и разделить на общее количество товара.

Заранее благодарен за помощь!

Добрый день, друзья!
Эксель 2007
Подскажите, пожалуйста, код макроса, который бы в столбцах J:M заменил значение ячейки #Н/Д (ошибка ранее заменена значениями) на ничего.
Ранее я применял формулу <"=IFERROR(VLOOKUP(RC[-9],Лист1!C[-11]:C[-5],7,0),"""")">, но последующая формула не видит пустую ячейку (как будто в пустой ячейке не пусто), поэтому, думаю, проще будет с режимом замены.
Спасибо!)

Доброго всем времени суток!
Ребята, нужна подсказка:
Эксель 2007
Есть формула =ЕСЛИ(M10>0;M10/0,9;F10), где 0,9 - величина меняющаяся, которая бы регулировалась через InputBox
Она же в макросе выглядит так: "=IF(RC[-1]>0,RC[-1]/0.9,RC[-8])"
Когда макрос доходит до этой формулы, то на экран выводится InputBox для ввода величины 0,9 или какого-либо другого значения, а после ввода величины применялась формула до последней ячейки.
Подскажите, пожалуйста, кусок кода макроса, если вам не сложно...
Спасибо!

Добрый день!
Эксель 2007.
В колонке E2 применил массивную формулу =МИН(ЕСЛИ($A$2:$A$42=A2;$D$2:$D$42)). Но через макрос она не работает
Автозаполнение, при этом, проходит успешно. A2 (она же - RC[-4]) не меняется.
Подскажите, пожалуйста, в чем может быть ошибка.
Заранее благодарен за помощь!

Sub Макрос10()
   Range("E2").Select
   Dim lLastRow As Long
   With ActiveSheet.UsedRange
   lLastRow = Cells(Rows.Count, 1).End(xlUp).Row
   Range("E2:E" & lLastRow).FormulaArray = "=MIN(IF(R2C1:R42C1=RC[-4],R2C4:R42C4))"
   Application.Calculation = xlAutomatic
   End With
End Sub

Добрый день, товарищи-профессионалы Экселя! Нужна ваша помощь)
Подскажите, пожалуйста:
Есть 2 текста:
В ячейке A2: МС1568 Винт с шайбой
В ячейке A3: МС2768
Изобрёл 2 формулы в двух колонках B2 и C2 соответственно:
=ЛЕВСИМВ(A2;ПОИСК(" ";A2)-1) эта формула оставляет артикул, удаляя наименование
=ПРАВСИМВ(A2;ДЛСТР(A2)-ПОИСК(" ";A2;ПОИСК(" ";A2))) эта формула оставляет наименование, удаляя артикул
Но, при наличии артикула без наименования (как в ячейке A3), формула не помогает - выводится #ЗНАЧ!
Тут, наверное, нужно еще вначале условие ЕСЛИ применить. Но как применить - я не знаю.
Нужны ваши советы, ребята)

Добрый день!
Подскажите, пожалуйста, формулу в прикрепленном файле.
Есть 4 поставщика товаров. Товары есть оригинальные и аналоги.
Если у нас (мы - второй зеленый поставщик) оригинал, то нужно найти наименьшую сумму у конкурентов среди оригиналов и отразить её в последней колонке. Если у нас аналог, то нужно найти наименьшую сумму у конкурентов среди аналогов и отразить её в последней колонке.
Заранее благодарен за помощь!

Здравствуйте, уважаемые форумчане.
Очень требуется ваша помощь, от которой зависит судьба человечества)) реально, это в какой-то мере поможет людям жить лучше)
Нужна такая формула:
Если в столбце А есть такое же значение, как в ячейке А2
И
Если в столбце В есть такое же значение, как в ячейке В2
И
Если в столбце С есть такое же значение, как в ячейке С2
И
Если в столбце D дата заполнена И она больше, чем в столбце С, то это ИСТИНА