powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / помогите с формулой
12 сообщений из 12, страница 1 из 1
помогите с формулой
    #36575838
Фотография -O_o-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Добрый день, господа.
Нуждаюсь в помощи, будьте так любезны хоть посмотреть на мою проблему. Задача заключается в следующем:
Есть ячейка в которой есть ссылка. Значение этой ячейки меняется при изменении в другом файле. Как сделать, так что бы когда менялось значение ячейки то менялось значение и в сводной таблице?:)
Заранее спасибо.


Ждешь то, о чем мечтаешь, а получишь - что заслужил!!!
...
Рейтинг: 0 / 0
помогите с формулой
    #36575845
Фотография -O_o-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Возможно есть какой-то другой вариант решения этой проблемы. Буду рад прочесть:)
...
Рейтинг: 0 / 0
помогите с формулой
    #36575887
Фотография vikttur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
<<значение формата будет тянуться из другой таблицы>>
Нужен образец "другой таблицы"
...
Рейтинг: 0 / 0
помогите с формулой
    #36575907
Фотография -O_o-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
vikttur<<значение формата будет тянуться из другой таблицы>>
Нужен образец "другой таблицы"

И еще хотел сказать, что эти 2-ве сводные будут в разных книгах. Возможно это будет играть какую-то роль.. Спасибо.
...
Рейтинг: 0 / 0
помогите с формулой
    #36575916
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
подойдет? как тянется в B2 вы не рассказали, поэтому на событие листа..
Код: plaintext
1.
2.
3.
4.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$2" Then
    ThisWorkbook.Worksheets("пример").PivotTables("СводнаяТаблица1").PivotFields("формат").CurrentPage = Cells( 2 ,  2 ).Value
End If
End Sub
...
Рейтинг: 0 / 0
помогите с формулой
    #36575942
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
почитал ваш новый пост. в принципе, всё должно работать.
только за значением в ячейке с написанной формулой лучше следить, в вашем случае, не через событие листа, а через Refedit change..
мне на этом форуме рассказывали подробно как это делать. в двух словах, создаете объект refedit, связанную ячейку указываете B2. значение B2 будет отображаться в окошке объекта. обрабатываете событие refedit_change..
...
Рейтинг: 0 / 0
помогите с формулой
    #36576082
Фотография -O_o-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
PlanBподойдет? как тянется в B2 вы не рассказали, поэтому на событие листа..
Код: plaintext
1.
2.
3.
4.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$2" Then
    ThisWorkbook.Worksheets("пример").PivotTables("СводнаяТаблица1").PivotFields("формат").CurrentPage = Cells( 2 ,  2 ).Value
End If
End Sub


Скажу чесно, в VBA я новичок. Сейчас пытаюсь понять как все это должно работать :) Если Вам не сложно, то могли бы вы мне рассказать по подробнее об этом коде.
Буду благодарен.
...
Рейтинг: 0 / 0
помогите с формулой
    #36576194
Фотография -O_o-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
-O_o-PlanBподойдет? как тянется в B2 вы не рассказали, поэтому на событие листа..
Код: plaintext
1.
2.
3.
4.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$2" Then
    ThisWorkbook.Worksheets("пример").PivotTables("СводнаяТаблица1").PivotFields("формат").CurrentPage = Cells( 2 ,  2 ).Value
End If
End Sub


Скажу чесно, в VBA я новичок. Сейчас пытаюсь понять как все это должно работать :) Если Вам не сложно, то могли бы вы мне рассказать по подробнее об этом коде.
Буду благодарен.

Как я понял то Target является переменной типа ячейка. Если объект со свойством Address = "$B$2" тогда выполняется процедура.
Мне не понятно что означает PivotTables. Подскажите ((((
...
Рейтинг: 0 / 0
помогите с формулой
    #36576412
Фотография -O_o-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Что-то не работает ((( Помогите пожалуйста.
...
Рейтинг: 0 / 0
помогите с формулой
    #36576494
m
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
m
Гость
PlanBтолько за значением в ячейке с написанной формулой лучше следить, в вашем случае, не через событие листа, а через Refedit change..
Спасибо за инфо, действительно интересная вещь... не знал раньше :)
Здесь описывается полностью как это сделать
Всем удачи! :)
...
Рейтинг: 0 / 0
помогите с формулой
    #36576664
Фотография -O_o-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
спасибо все работает.
...
Рейтинг: 0 / 0
помогите с формулой
    #36576823
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
-O_o-Как я понял то Target является переменной типа ячейка. Если объект со свойством Address = "$B$2" тогда выполняется процедура.
Мне не понятно что означает PivotTables. Подскажите ((((это обращение к сводной таблице, а дальше - её полю присваивается значение требуемой ячейки...

да, и какая разница, по большому счету? я это макрорекордером записал не включая мозг... или, думаете, я в голове храню, как к ячейкам сводной таблицы обращаться... =)))
...
Рейтинг: 0 / 0
12 сообщений из 12, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / помогите с формулой
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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