Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?
Гродненский Форум
13 Август 2025, 09:44:32
Новости, реклама:
   Главная   Новости Гродно Помощь Игры Календарь Войти Регистрация   Меню
Гродненский Форум > Компьютеры > Компьютеры, софт > Тема: Re: Помощь в Excel
(Модераторы: xfiles, DeleteR, barmalei) > Тема:

Сообщение #546585

Страниц  :   Вниз
« предыдущая тема следующая тема »
  Печать  
Автор Тема: Re: Помощь в Excel  (Прочитано 3275 раз)
0 Пользователей и 1 Гость смотрят эту тему.
DIV
Настоящий гродненец
****

Репутация: +42/-0
Offline Offline

Пол: Мужской
Сообщений: 307


будь Человеком - http://vseminfo.ru/

Просмотр профиля
« Ответ #0 : 13 Апрель 2007, 17:56:07 »
вот те макрос, вставляется в код листа, анализирует 4 и 5 столбцы

Private Sub Worksheet_Change(ByVal Target As Range)
If (Target.Column = 4) Or (Target.Column = 5) Then
 If Cells(Target.Row, 4).Value > Cells(Target.Row, 5).Value Then
  Cells(Target.Row, 4).Font.ColorIndex = 1
  Cells(Target.Row, 5).Font.ColorIndex = 1
 Else
  Cells(Target.Row, 4).Font.ColorIndex = 3
  Cells(Target.Row, 5).Font.ColorIndex = 3
 End If
End If
End Sub
Записан
Страниц  :   Вверх
  Печать  
Гродненский Форум > Компьютеры > Компьютеры, софт > Тема: Re: Помощь в Excel
(Модераторы: xfiles, DeleteR, barmalei)
 « предыдущая тема следующая тема »
 
Перейти в:  

Войти
Войдите, чтобы добавить комментарий
Войдите через социальную сеть
Имя пользователя:
Пароль:
Продолжительность сессии (в минутах):
Запомнить:
Забыли пароль?
Контакт
Powered by MySQL Powered by PHP Мобильная версия
Powered by SMF 1.1.20
SMF © 2006-2025, Simple Machines
Simple Audio Video Embedder | Sitemap 		Valid XHTML 1.0! Valid CSS!
Страница сгенерирована за 0,101 секунд. Запросов: 20.