Страницы: 1
RSS
Сбор информации
 
Здравствуйте! Подскажите пожалуйста, при подстановке макросом формулы массива выдает ошибку:  
Нельзя установить свойство FormulaArray класса Range. Не пойму что ему от меня нужно.  
 
           If r > 1 Then Cells(t, 12).FormulaArray = _  
           "=SUM((Лист1!R2C1:R21C1=" & p1 & ")*(Лист1!R2C2:R21C2=" & p2 & ")*(Лист1!R2C3:R21C3=" & p3 & ")*(Лист1!R2C4:R21C4))" Else Cells(t, 12) = p4  
           If r > 1 Then Cells(t, 13) = Cells(t, 11) * Cells(t, 12) Else Cells(t, 13) =    
хотя если вмечто p3 принудительно указывать 55,6 или 70,8 то работает
 
Не знаю, что у вас не так с формулой массива, но могу предложить другой вариант:  
 
http://excelvba.ru/XL_Files/Sample__02-01-2011__15-15-35.zip  
(нажмите зелёную кнопочку)  
 
Использована эта функция: http://excelvba.ru/code/JoinedArray
 
Спасибо! То что надо
 
Между прочим, макросы тут абсолютно не нужны.  
 
За пару минут можно соорудить сводную таблицу:  
http://excelvba.ru/XL_Files/Sample__02-01-2011__15-33-50.zip
Страницы: 1
Читают тему
Наверх