написал: Заполните все ячейки столбца ProductCode и воспользуйтесь функцией СУММЕСЛИ()
Как можно массово заполнить все пустые ячейки ProductCode кодом товара? Что нужно указывать как критерий в функции чтобы получить сумму только в одной строчке напротив кода товара?
Sub testspeed()
Application.Calculation = xlCalculationManual
For Each Cell In Selection
Application.Wait Now() + CDate("0:0:1")
t = Timer
For i = 1 To 10000
Cell.Calculate
Next
Debug.Print Cell.Formula, (Timer - t) * 1000
Next
Application.Calculation = xlCalculationAutomatic
End Sub
единственное что нужно это количество циклов иногда уменьшить а то можно результата не дождаться :-)
ну да ) шота про нечеткий поиск не подумалось Вариации на тему =ЕСЛИ(A2="";"";СУММ(C2:ИНДЕКС(C2:C$32766;ЕСЛИОШИБКА(ПОИСКПОЗ("*";A3:A$32767;);32767-СТРОКА()))))
Когда переносил, не взглянул на диапазон. Попробовал на 10000. Не очень. Ну понятно, что такая схема быстро работать не будет - 50-100 записей вполне сносно.