Добрый день!
Есть стандартный макрос:
Проверяет в нужном мне диапазоне есть ли ячейки выделенные цветом и снимает выделение.
В макросах не силен.
Пытаюсь реализовать, чтобы:
Если ячейка выделена желтым, то снять выделение в ячейке + значение в данной строчке в колонке "F" умножить на 2
Подскажите, пожалуйста, как реализовать второе условие на примере моего кода
Есть стандартный макрос:
Код |
---|
Sub Button_Click4() Dim R As Range For Each R In Range("J2:J200") If R.Interior.Color = vbYellow Then R.Interior.Pattern = xlNone Next End Sub |
В макросах не силен.
Пытаюсь реализовать, чтобы:
Если ячейка выделена желтым, то снять выделение в ячейке + значение в данной строчке в колонке "F" умножить на 2
Подскажите, пожалуйста, как реализовать второе условие на примере моего кода