ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Обновление внешнего поля, при обновлении сводной таблицы.
24 сообщений из 24, страница 1 из 1
Обновление внешнего поля, при обновлении сводной таблицы.
    #36879649
.Anatoly.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
.Anatoly.
Участник
Добрый день!

Microsoft Excel 2007
На листе есть заголовок "Отчет за dd.mm.yyyy" и сводная таблица. Что бы ее обновить человек лезет в панель "Данные" и нажимает кнопку "Обновить" или обновляет через контекстное меню таблицы. Можно ли сделать так, что бы при обновлении таблицы обновлялась и дата в заголовке?

Заранее спасибо
...
Рейтинг: 0 / 0
04.10.2010, 10:04
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36879669
Фотография Shamanus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shamanus
Участник
.Anatoly.,

можно, например VBA скриптом или исходными данными разрулить
...
Рейтинг: 0 / 0
04.10.2010, 10:21
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36879688
.Anatoly.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
.Anatoly.
Участник
Shamanus, можно чуть подробней!
Как повесить обработчик события на обновления таблицы с помощью VBA?
Что значит исходными данными?
...
Рейтинг: 0 / 0
04.10.2010, 10:29
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36879693
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MaximuS_G
Участник
Если в сводной таблице есть дата, сделайте ссылку на ячейку с датой.
Если нет, откуда система должна знать, какую дату ставить?
...
Рейтинг: 0 / 0
04.10.2010, 10:30
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36879707
.Anatoly.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
.Anatoly.
Участник
MaximuS_G, Даты есть, но это одно из измерений. Нужно ставить текущую дату.
...
Рейтинг: 0 / 0
04.10.2010, 10:35
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36879774
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MaximuS_G
Участник
Самый простой вариант.
Сделайте кнопку, когда ее будет нажимать пользователь, обновиться таблица и дата.
...
Рейтинг: 0 / 0
04.10.2010, 11:11
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36879795
.Anatoly.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
.Anatoly.
Участник
MaximuS_G, хотелось бы избежать кнопок. И что бы способы обновления таблицы был как и прежде, либо через панель "Данные", либо контекстное меню таблицы.
...
Рейтинг: 0 / 0
04.10.2010, 11:21
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36879811
Фотография Serge 007
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge 007
Участник
.Anatoly.Нужно ставить текущую дату.
В ячейку такую формулу:
Код: plaintext
=СЕГОДНЯ()
...
Рейтинг: 0 / 0
04.10.2010, 11:30
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36879843
.Anatoly.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
.Anatoly.
Участник
Serge 007.Anatoly.Нужно ставить текущую дату.
В ячейку такую формулу:
Код: plaintext
=СЕГОДНЯ()


Нужно, что бы значение в ячейке изменялось, только при обновлении таблицы. Если я поступлю так как предлагаете Вы, то я получу не совсем желаемый результат.
...
Рейтинг: 0 / 0
04.10.2010, 11:45
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36879900
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MaximuS_G
Участник
Может быть выводить текущую дату в поле сводной таблицы, и скрывать это поле, и делать ссылку.
...
Рейтинг: 0 / 0
04.10.2010, 12:10
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36879901
Фотография Shamanus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shamanus
Участник
.Anatoly.,

исходные данные где?
...
Рейтинг: 0 / 0
04.10.2010, 12:11
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36879917
Фотография -O_o-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
-O_o-
Участник
.Anatoly.Serge 007.Anatoly.Нужно ставить текущую дату.
В ячейку такую формулу:
Код: plaintext
=СЕГОДНЯ()


Нужно, что бы значение в ячейке изменялось, только при обновлении таблицы. Если я поступлю так как предлагаете Вы, то я получу не совсем желаемый результат.
Не совсем корректно, но думаю, что сами додумаете дальше. Примерно вот таким образом можно сделать.
...
Рейтинг: 0 / 0
04.10.2010, 12:20
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36879937
Фотография Serge 007
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge 007
Участник
.Anatoly.Serge 007.Anatoly.Нужно ставить текущую дату.
В ячейку такую формулу:
Код: plaintext
=СЕГОДНЯ()


Нужно, что бы значение в ячейке изменялось, только при обновлении таблицы. Если я поступлю так как предлагаете Вы, то я получу не совсем желаемый результат.
Код: plaintext
1.
2.
3.
4.
5.
Sub Date_()
    ActiveSheet.PivotTables("название сводной").PivotCache.Refresh
    Range("D1").Select
    ActiveCell.FormulaR1C1 = "=TODAY()"
End Sub
...
Рейтинг: 0 / 0
04.10.2010, 12:26
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36880020
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MaximuS_G
Участник
Sub Date_()
ActiveSheet.PivotTables("название сводной").PivotCache.Refresh
Range("D1").Select
ActiveCell.FormulaR1C1 = "=TODAY()"
Range("D1").FormulaR1C1 = "=TODAY()
End Sub
...
Рейтинг: 0 / 0
04.10.2010, 13:00
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36880031
Фотография Shamanus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shamanus
Участник
в общем 3 строки кода на самом деле оказалось

Код: plaintext
1.
2.
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
Cells( 1 ,  1 ) = ActiveSheet.PivotTables( 1 ).RefreshDate
End Sub
...
Рейтинг: 0 / 0
04.10.2010, 13:03
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36880042
.Anatoly.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
.Anatoly.
Участник
Shamanus.Anatoly.,

исходные данные где?

Данные берутся с сервера и сразу загружаются в сводную таблицу.
...
Рейтинг: 0 / 0
04.10.2010, 13:05
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36880131
Фотография -O_o-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
-O_o-
Участник
.Anatoly.,
MaximuS_G сразу видно, что на работе интернет появился )))))) Вообщем задача решена .Anatoly. !!!
...
Рейтинг: 0 / 0
04.10.2010, 13:29
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36880137
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MaximuS_G
Участник
-O_o-.Anatoly.,
MaximuS_G сразу видно, что на работе интернет появился )))))) Вообщем задача решена .Anatoly. !!!

Я тут случайно, у меня по ворду вопрос :)
...
Рейтинг: 0 / 0
04.10.2010, 13:30
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36880188
Фотография -O_o-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
-O_o-
Участник
MaximuS_G-O_o-.Anatoly.,
MaximuS_G сразу видно, что на работе интернет появился )))))) Вообщем задача решена .Anatoly. !!!

Я тут случайно, у меня по ворду вопрос :)
Случайно > 700 сообщений отправил ))
...
Рейтинг: 0 / 0
04.10.2010, 13:43
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36880197
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MaximuS_G
Участник
-O_o-MaximuS_G-O_o-.Anatoly.,
MaximuS_G сразу видно, что на работе интернет появился )))))) Вообщем задача решена .Anatoly. !!!

Я тут случайно, у меня по ворду вопрос :)
Случайно > 700 сообщений отправил ))

В прошлом году :)... посмотри дату моего предпоследнего топика :).
...
Рейтинг: 0 / 0
04.10.2010, 13:46
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36880199
.Anatoly.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
.Anatoly.
Участник
Shamanusв общем 3 строки кода на самом деле оказалось

Код: plaintext
1.
2.
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
Cells( 1 ,  1 ) = ActiveSheet.PivotTables( 1 ).RefreshDate
End Sub


Не могли бы вы прокомментировать этот макрос
...
Рейтинг: 0 / 0
04.10.2010, 13:46
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36880237
Фотография Shamanus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shamanus
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable) ' обработка события листа 
' событие называется обновление сводной таблицы (pivot table - сводная таблица, update - обновление)
' возникает при любом изменении сводной таблицы - рефреш, раскрытие и т.п.
' т.к. событие принадлежит листу, то код должен быть в листе с таблицей
Cells( 1 ,  1 ) = ActiveSheet.PivotTables( 1 ).RefreshDate  ' в ячейку с координатами 1,1 или "A1" кладем свойство
' сводной таблицы раскладка формулы такая
' ActiveSheet- текущий лист
' PivotTables(1) - принадлежащая текущему листу таблица с индексом 1, индекс присваивается автоматом
' по мере создания сводных таблиц и в конкрентном случае может быть неизвестен
' тогда можно ссылаться на имя таблицы например так ActiveSheet.PivotTables("СводнаяТаблица1")
' RefreshDate это свойство принадлежащее таблице 1 принадлежайщей текущему листу.
' свойство содержит дату и время обновления текущей сводной таблицы
End Sub

резюмируя - каждый раз когда вы тыкаете сводную таблицу с какой либо целью мы выводим дату и время обновления таблицы в ячейку 1,1.
Если это тыканье было НЕ обновление сводной таблицы, юзер ничего не замечает, иначе он видит обновленную дату.

с Вас 100 рублей....
...
Рейтинг: 0 / 0
04.10.2010, 13:56
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36880257
Фотография -O_o-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
-O_o-
Участник
Shamanus,
+1 ))
...
Рейтинг: 0 / 0
04.10.2010, 14:03
| Ответить | Цитировать | Написать  
Обновление внешнего поля, при обновлении сводной таблицы.
    #36880398
.Anatoly.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
.Anatoly.
Участник
Shamanus, спасибо, весьма доходчиво!
...
Рейтинг: 0 / 0
04.10.2010, 14:47
| Ответить | Цитировать | Написать  
24 сообщений из 24, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Обновление внешнего поля, при обновлении сводной таблицы.
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=36879843&tid=2177614]:
 0ms
get settings:
 8ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 159ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 61ms
get tp. blocked users:
 1ms
others: 216ms
total:  478ms
созд. / загр.: 478ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]