Формат ячейки равнялся формату ячейки из другого листа?

[Alexandrone]

Здравствуйте!
Подскажите, пожалуйста, как сделать чтобы ячейка равнялась ячейке из другого листа? Причем нужно чтобы полностью равнялась, т.е. значение, цвет, шрифт, границы. Во вложении пример. Нужно на листе Сводный график в разделах Ctp и Печать видеть то же самое, что мы видим на листах Ctp и Печать. Т.е. написали/нарисовали на одном листе и это же отображается на сводном листе. Как такое можно сделать?

[R Dmitry]

Сообщение от Alexandrone

Здравствуйте!
Подскажите, пожалуйста, как сделать чтобы ячейка равнялась ячейке из другого листа? Причем нужно чтобы полностью равнялась, т.е. значение, цвет, шрифт, границы. Во вложении пример. Нужно на листе Сводный график в разделах Ctp и Печать видеть то же самое, что мы видим на листах Ctp и Печать. Т.е. написали/нарисовали на одном листе и это же отображается на сводном листе. Как такое можно сделать?

только vba

[Alexandrone]

Сообщение от R Dmitry

только vba

Этого я и боялся Не дружу я с vba

[kim2]

Попробуйте объединить в группу нужные листы, например Стр и График сводный, кликая по ярлычкам листов с нажатой Ctrl.
Теперь все действия с ячейками, выполняемые на одном из этих листов будут дублироваться в другом.

[R Dmitry]

Сообщение от kim2

Попробуйте объединить в группу нужные листы, например Стр и График сводный, кликая по ярлычкам листов с нажатой Ctrl.
Теперь все действия с ячейками, выполняемые на одном из этих листов будут дублироваться в другом.

Так то оно так, только придется помнить что перед тем как внести изменения надо нажать ctrl и пройтись по всем листам

[R Dmitry]

можно так при условии что адреса данных одинаковые
но так надо вводить сначала форматы , а затем данные
Private Sub Worksheet_Change(ByVal Target As Range)
Dim str$
str = Target.AddressLocal
Target.Copy
With Sheets("СВОДНЫЙ ГРАФИК")
.Range(str).PasteSpecial
End With
End Sub
можно при активации листа "СВОДНЫЙ ГРАФИК" копировать диапазоны на одном и втором листе и вставлять в "СВОДНЫЙ ГРАФИК"