Страницы: 1
RSS
Автоматическое обновление данных в сводной таблице
 
Всех приветствую!

Есть Эксельник, в нем 2 листа: исходник и сводная. На листе Сводная есть ячейка (В11), которая завязана на формулу в исходнике. Соответственно, когда обновляю значения в ячейке В11 идет пересчет данных в столбце Е на листе Исходник. При этом данные в сводной таблице не обновляются, приходится каждый раз нажимать Даннные - Обновить все. Как сделать так, чтобы при изменении значений в ячейке В11 автоматически сразу обновлялись данные в сводной таблице?На форуме где-то находил макрос, но там немного другой алгоритм. При вводе значений в ячейке В11 необходимо перейти на лист Исходник, тогда данные обновятся в сводной таблице. Но это опять же не очень удобно. Пример во вложении
 
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("B11")) Is Nothing Then
        Calculate
        ActiveWorkbook.RefreshAll
    End If
End Sub
 
а можете поподробнее написать куда это вставлять и на какой листе?
Изменено: Junior86 - 14.07.2017 11:52:22
 
Junior86, зачем в данном случае цитата? На чём хотели сделать акцент?
Вернитесь в своё сообщение и исправьте.
 
Если у меня помимо регулируемой ячейки есть еще одна такая же, например, изменение цены.
То в макросе как прописать?Условие: могут регулировать они обе или одна из них, а вторая не трогается.

Также, макрос почему то не работает, если есть ползунок.
 
Код
Range("B11, D11")
 
Всем спасибо, все заработало как надо!
Страницы: 1
Читают тему
Наверх