Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » Александр Иванов
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Зеркальные ячейки на разных листах
 
#
23.06.2022 09:22:58
Цитата
написал:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)    If Not Intersect(Target, Sh.Range("C8")) Is Nothing Then        Application.EnableEvents = False            For Each Current In Worksheets                If Not Current.Name = Sh.Name Then Current.Range("C8").Value = Target            Next        Application.EnableEvents = True    End IfEnd Sub

Спасибо большое, работает!)))
 
Перейти    
Зеркальные ячейки на разных листах
 
#
22.06.2022 21:48:52
Ігор Гончаренко, скопировал лист при попытке изменить данные в ячейке выдает ошибку
 
Перейти    
Зеркальные ячейки на разных листах
 
#
22.06.2022 21:40:17
_Igor_61, вот допустим, есть файл прайса, есть одинаковая ячейка с скидкой на трех страницах, как сделать так что б изменяя скидку на одной из  страниц, она автоматически менялась на двух оставшихся, независимо от того на какой странице ты ее меняешь
 
Перейти    
Зеркальные ячейки на разных листах
 
#
22.06.2022 20:59:15
_Igor_61, это я написал как пример того как меняется, это на одном листе две колонки но они меняются зеркально если поменять A1 поменяется B1 и наоборот, мне нужно на разных листах

Msi2102, ругается если вставлять в каждый модуль в каждый лист и изменить ячейку вообще не дает



работает только на какой то одной странице, при добавлении на каждую и попытке поменять значение выскакивает ошибка выше
Изменено: Александр Иванов - 22.06.2022 21:18:28
 
Перейти    
Зеркальные ячейки на разных листах
 
#
22.06.2022 19:50:03
Msi2102, спасибо, это уже почти то что нужно, но активное поле получается только на первом листе, если поменять значения на втором листе в той же ячейке С8, на первом и втором они не поменяются, а надо что б незавсимо на каком листе делались изменения в ячейке, они так же менялись на других листах

извините, что морочу голову, но сам я от этого очень далек и не разбираюсь))
 
Перейти    
Зеркальные ячейки на разных листах
 
#
22.06.2022 18:55:18
Msi2102, это вроде не совсем то, это дублирование ячейки с какой то определенного листа, а мне надо что б на любом листе я мог менять это число и оно менялось в других листах

что то типа такого, только ячейки должны быть на разных листах
Код
Private Sub Worksheet_Change(ByVal Target As Range) 
If Not Intersect(Target, [A1:B1]) Is Nothing Then 
Application.EnableEvents = False 
[A1:B1] = Target 
Application.EnableEvents = True 
End If 
End Sub
Изменено: Александр Иванов - 22.06.2022 19:04:10
 
Перейти    
Зеркальные ячейки на разных листах
 
#
22.06.2022 18:08:41
Добрый день, подскажите пожалуйста нужно сделать что б одна из ячеек на листах ексель была зеркальной, можно ли сделать стандартными средствами ексель или может кто подскажет макрос

что имеется ввиду под словом зеркальной:
допустим есть ячейка С8, нужно сделать так что на каком бы листе я не изменил содержимое, оно дублировалось на других листах, в той же ячейке
 
Перейти    
Страницы: 1
Наверх