Если цвет, то действие

@mor_sergey · Регистрация: 28.03.2018

Author24 — интернет-сервис помощи студентам

Ребят не соображу как при окрашивании к примеру желтым, получить действие. например написать. Вернее это легко, а как именно на окрашивание....т.е. выбрал ячейку пликом, покрасил и действие

@Alex77755 · 24.04.2019, 20:37

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

Visual Basic

Dim zwet, adres
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If zwet <> Range(adres).Interior.Color Then
        MsgBox zwet
    End If
 
    adres = Target.Address
    zwet = Target.Interior.Color
    
End Sub

@mor_sergey · 29.04.2019, 19:14 **[ТС]**

Alex77755, за базу взял Ваш цикл. спасибо

@mor_sergey 77 / 11 / 0 Регистрация: 28.03.2018 Сообщений: 828
		1
	Если цвет, то действие 24.04.2019, 15:32. Показов 1147. Ответов 2 Метки нет (Все метки) Ребят не соображу как при окрашивании к примеру желтым, получить действие. например написать. Вернее это легко, а как именно на окрашивание....т.е. выбрал ячейку пликом, покрасил и действие 0

@mor_sergey 77 / 11 / 0 Регистрация: 28.03.2018 Сообщений: 828
	29.04.2019, 19:14 [ТС]	3
	Alex77755, за базу взял Ваш цикл. спасибо 0

Если цвет, то действие

Решение