прописать макрос, который при заполнении таблицы, будет сравнивать столбец 2019 (факт) и 2019 (план), и фактические значения отображать цветом - Microsoft Office Excel

Ульяна(А) · 04.09.2019, 11:42

есть таблица, пример
2018 2019(факт) 2019 (план)
выручка
себестоимость

мне необходимо прописать макрос, который при заполнении таблицы, будет сравнивать столбец 2019 (факт) и 2019 (план), и фактические значения отображать цветом (если факт>план - зеленый; если факт<план - красный)

Serge_Bliznykov · 04.09.2019, 12:11

во-первых, таблицы у нас нет.
а во-вторых, чем условное форматирование не устраивает, зачем макрос?

Ульяна(А) · 04.09.2019, 13:08

Хотелось бы максимально автоматизировать процесс. Так как таблица в книге не одна.
Просто скажите, какие есть варианты, и есть ли возможность прописать программу. Таблицу если нужно могу скинуть.

Serge_Bliznykov · 04.09.2019, 14:48

Цитата:

Сообщение от Ульяна(А)

Хотелось бы максимально автоматизировать процесс. Так как таблица в книге не одна.

ну так Excel позволяет заполнить одну ячейку корректной формулой условного форматирования и потом скопировать на сколько угодно таблиц.
а впрочем, можно условное форматирование и макросом сделать, если руками это не выходит. тут надо конкретно смотреть.

Цитата:

Сообщение от Ульяна(А)

росто скажите, какие есть варианты, и есть ли возможность прописать программу.

Надо смотреть таблицу. Варианты есть всегда

Цитата:

Сообщение от Ульяна(А)

Таблицу если нужно могу скинуть.

скиньте. хуже не будет.

ArtNord · 04.09.2019, 14:54

Ну или хотя бы напишите в каком столбце план в каком факт

Elixi · 04.09.2019, 17:42

Цитата:

Сообщение от Ульяна(А)

Таблицу если нужно могу скинуть.

Нет, не нужнo. Нo без таблицы придётся обратиться к гадалке.
A времена тяжёлыми стали. Даже гадалки сегодня 100% гарантии не дают.

Ульяна(А) · 05.09.2019, 15:15

Пример во вложении.

ArtNord · 05.09.2019, 16:38

Так. Проверяет при изменении данных. Макрос в Лист1

ArtNord · 05.09.2019, 16:38

Код:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column <> 3 And Target.Column <> 5 Then Exit Sub
aRow = Target.Row
If Cells(aRow, 3) > Cells(aRow, 5) Then Cells(aRow, 3).Interior.Color = 5296274
If Cells(aRow, 3) < Cells(aRow, 5) Then Cells(aRow, 3).Interior.Color = 235
If Cells(aRow, 3) = Cells(aRow, 5) Then Cells(aRow, 3).Interior.Pattern = xlNone

End Sub

ArtNord · 05.09.2019, 16:42

1. Вы не указали, что нужно делать если равны. Поэтому заливка очищается.
Это можно исправить
2. В Вашем файле есть значения Факт > Плана, но заливка красная
3. Макрос работает при изменении данных в столбцах План (5) или Факт (3)
4. Если нужна проверка по нажатию кнопки, то можно изменить
5. Для того, чтобы макрос работал в Вашем оригинальном файле, нужно перенести макрос в соответствующий лист Вашей книги

04.09.2019, 11:42	#1
Ульяна(А) Регистрация: 04.09.2019 Сообщений: 4	прописать макрос, который при заполнении таблицы, будет сравнивать столбец 2019 (факт) и 2019 (план), и фактические значения отображать цветом есть таблица, пример 2018 2019(факт) 2019 (план) выручка себестоимость мне необходимо прописать макрос, который при заполнении таблицы, будет сравнивать столбец 2019 (факт) и 2019 (план), и фактические значения отображать цветом (если факт>план - зеленый; если факт<план - красный)

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
коэффициент на налог на недвижимость за 2018 год, в 2019 году который платить вместо 0.8 будет 1, в этом же году платим за 2017 по 0.6	Alar	Свободное общение	4	17.09.2019 16:06
в сводном отчете добавить столбец отклонения план - факт	НатальяС	Помощь студентам	0	01.08.2017 14:41
Как связать две таблицы план/факт с разным уровнем детализации	shade2009	Microsoft Office Access	0	29.09.2014 12:23
макрос который будет копировать столбец А из закрытой книги Данные, и вставлять в книгу Сток в столбец B	Utirka66	Microsoft Office Excel	8	06.07.2009 09:53

04.09.2019, 12:11	#2
Serge_Bliznykov Старожил Регистрация: 09.01.2008 Сообщений: 26,229	во-первых, таблицы у нас нет. а во-вторых, чем условное форматирование не устраивает, зачем макрос?

04.09.2019, 13:08	#3
Ульяна(А) Регистрация: 04.09.2019 Сообщений: 4	Хотелось бы максимально автоматизировать процесс. Так как таблица в книге не одна. Просто скажите, какие есть варианты, и есть ли возможность прописать программу. Таблицу если нужно могу скинуть.

04.09.2019, 14:54	#5
ArtNord Пользователь Регистрация: 03.12.2018 Сообщений: 77	Ну или хотя бы напишите в каком столбце план в каком факт

05.09.2019, 16:42	#10
ArtNord Пользователь Регистрация: 03.12.2018 Сообщений: 77	1. Вы не указали, что нужно делать если равны. Поэтому заливка очищается. Это можно исправить 2. В Вашем файле есть значения Факт > Плана, но заливка красная 3. Макрос работает при изменении данных в столбцах План (5) или Факт (3) 4. Если нужна проверка по нажатию кнопки, то можно изменить 5. Для того, чтобы макрос работал в Вашем оригинальном файле, нужно перенести макрос в соответствующий лист Вашей книги