Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Изменения Заливки Ячейки взависимости от стиля другой Ячейки
 
#1
12.09.2018 17:57:20
Нужно  сделать так, чтоб в столбце A менялась заливка при изменении стиля в столбце B. Буду очень благодарен за помощь :)  
 
 
 
#2
12.09.2018 20:50:11
1. Зайдите в свой профиль и поменяйте отображаемое имя (логин).
2. Изменение стиля не отслеживается. Ни формулы, не макросы не умеют это делать.
Если стиль меняется по какой-то логике, то нужно использовать аналогичную и для столбца А.  
 
 
 
#3
12.09.2018 20:56:06
А изменение формата отслеживается?
 
 
 
#4
12.09.2018 21:00:46
Тоже нет.
 
 
 
#5
12.09.2018 21:51:52
Ну если не шаманить таким образом

Код
Private Sub Worksheet_Activate()
    If Not Intersect(Selection, Range("B2")) Is Nothing Then
        Range("D2").Interior.Color = Range("B2").Interior.Color
        MyFormat
    Else
        On Error Resume Next
        Application.OnTime NextCheck, "MyFormat", Schedule:=False
    End If
End Sub

Private Sub Worksheet_Deactivate()
    On Error Resume Next
    Application.OnTime NextCheck, "MyFormat", Schedule:=False
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("B2")) Is Nothing Then
        Range("D2").Interior.Color = Range("B2").Interior.Color
        MyFormat
    Else
        On Error Resume Next
        Application.OnTime NextCheck, "MyFormat", Schedule:=False
    End If
End Sub


Код
Public NextCheck As Date

Sub MyFormat()
    NextCheck = Now + CDate("00:00:01")
    With ActiveSheet
        If .Range("D2").Interior.Color <> .Range("B2").Interior.Color Then _
            .Range("D2").Interior.Color = .Range("B2").Interior.Color
    End With
    Application.OnTime NextCheck, "MyFormat"
End Sub
По вопросам из тем форума, личку не читаю.
 
 
 
#6
12.09.2018 22:57:20
Спасибо, но мне бы только как здесь, но только чтоб макрос распостранялся на столбцы А и B, а не только на заданые ячейки.
Изменено: Андрей Филатов - 12.09.2018 22:57:38
 
 
 
#7
14.09.2018 13:23:33
Юрий М, У меня получилось как-то так, но можно ли сделать заливку сразу после изменение цвета другой ячейки? Потому что мне приходится еще раз нажимать на ячейку для заливки остальных двух.
 
 
 
#8
14.09.2018 13:37:41
Цитата
Андрей Филатов написал:
можно ли сделать заливку сразу после изменение цвета другой ячейки?
Нет: Microsoft не дал нам возможность отслеживать событие изменения цвета заливки.
 
 
 
Страницы: 1
Наверх