Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Как отследить изменение в ячейке? - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Как отследить изменение в ячейке? (Формулы/Formulas)
Как отследить изменение в ячейке?
ИгорьЛеонидов Дата: Суббота, 10.02.2018, 15:12 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Добрый день. Подскажите как я могу отследить изменение в ячейке.
Допустим есть ячейка которая отслеживает курс доллара. Она обновляется. Нужно ее как то подсветить если курс выше стал одним цветом, если ниже то другим.
Так же хотелось бы процент увидеть рядом в ячейке поднятия или опускания курса. Т.е. ячейка должна проверять саму себя и сравнивать старое число и обновленное новое в ней.
Можно ли средствами excel это сделать?

В первом файле просто изменение ячейки руками. Во втором берется информация с интернета.
К сообщению приложен файл: 8788398.xlsx(9.1 Kb) · 6070025.xlsx(12.7 Kb)


Сообщение отредактировал ИгорьЛеонидов - Суббота, 10.02.2018, 15:38
 
Ответить
СообщениеДобрый день. Подскажите как я могу отследить изменение в ячейке.
Допустим есть ячейка которая отслеживает курс доллара. Она обновляется. Нужно ее как то подсветить если курс выше стал одним цветом, если ниже то другим.
Так же хотелось бы процент увидеть рядом в ячейке поднятия или опускания курса. Т.е. ячейка должна проверять саму себя и сравнивать старое число и обновленное новое в ней.
Можно ли средствами excel это сделать?

В первом файле просто изменение ячейки руками. Во втором берется информация с интернета.

Автор - ИгорьЛеонидов
Дата добавления - 10.02.2018 в 15:12
abtextime Дата: Суббота, 10.02.2018, 15:21 | Сообщение № 2
Группа: Проверенные
Ранг: Ветеран
Сообщений: 829
Репутация: 117 ±
Замечаний: 0% ±

Excel 2010
Ячейка сама себя проверять не может. Она довольно тупенькое существо )

То, о чем Вы пишете, можно сделать. Только файл-пример приложите, в соответствии с Правилами Форума. Тем более, надо посмотреть, как именно реализовано обновление курса доллара в таблице. От этого решение зависит.

А в целом, если по уму - надо не только обновлять курс доллара в ячейке, но и элементарно записывать каждое обновление в "журнал", тогда можно какую угодно красоту наводить
 
Ответить
СообщениеЯчейка сама себя проверять не может. Она довольно тупенькое существо )

То, о чем Вы пишете, можно сделать. Только файл-пример приложите, в соответствии с Правилами Форума. Тем более, надо посмотреть, как именно реализовано обновление курса доллара в таблице. От этого решение зависит.

А в целом, если по уму - надо не только обновлять курс доллара в ячейке, но и элементарно записывать каждое обновление в "журнал", тогда можно какую угодно красоту наводить

Автор - abtextime
Дата добавления - 10.02.2018 в 15:21
ИгорьЛеонидов Дата: Суббота, 10.02.2018, 15:32 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
abtextime, Было бы интересно записывать логи изменения цифры в ячейке.
Но как заставить при каждом обновлении листа записывать в отдельный лист лог.
 
Ответить
Сообщениеabtextime, Было бы интересно записывать логи изменения цифры в ячейке.
Но как заставить при каждом обновлении листа записывать в отдельный лист лог.

Автор - ИгорьЛеонидов
Дата добавления - 10.02.2018 в 15:32
bmv98rus Дата: Суббота, 10.02.2018, 17:15 | Сообщение № 4
Группа: Проверенные
Ранг: Старожил
Сообщений: 1261
Репутация: 214 ±
Замечаний: 0% ±

Excel 2013/2016
Ве зависит от того как и чем производится изменений, щас поищу пример, где Web Query обновляется автоматически и на листе подсвечиваются последние изменения.

http://www.excelworld.ru/forum/2-32074-1#207819


Сообщение отредактировал bmv98rus - Суббота, 10.02.2018, 17:33
 
Ответить
СообщениеВе зависит от того как и чем производится изменений, щас поищу пример, где Web Query обновляется автоматически и на листе подсвечиваются последние изменения.

http://www.excelworld.ru/forum/2-32074-1#207819

Автор - bmv98rus
Дата добавления - 10.02.2018 в 17:15
Pelena Дата: Суббота, 10.02.2018, 17:39 | Сообщение № 5
Группа: Модераторы
Ранг: Местный житель
Сообщений: 12907
Репутация: 2843 ±
Замечаний: 0% ±

Excel 2010, 2016 & Mac Excel
Может, так подойдёт для ручного изменения?
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim curs_old, curs
    If Target.Address <> "$A$5" Then Exit Sub
    Application.ScreenUpdating = False
    curs = Target.Value
    Application.EnableEvents = False
    Application.Undo
    curs_old = Target.Value
    Target.Offset(, 3) = 1 - curs_old / curs
    Target.Value = curs
    Target.Offset(, 1) = curs_old
    If curs >= curs_old Then Target.Interior.Color = vbGreen Else Target.Interior.Color = vbRed
    Application.EnableEvents = True
    Application.ScreenUpdating = True
End Sub
[/vba]
а для обновления по формуле примерно так
[vba]
Код
Private Sub Worksheet_Calculate()
    Dim curs_old, curs
    Application.ScreenUpdating = False
    curs = [A5].Value
    Application.EnableEvents = False
    Application.Undo
    curs_old = [A5].Value
    [A5].Offset(, 3) = 1 - curs_old / curs
    [A5].Formula = "=Лист2!B4"
    [A5].Offset(, 1) = curs_old
    If curs >= curs_old Then [A5].Interior.Color = vbGreen Else [A5].Interior.Color = vbRed
    Application.EnableEvents = True
    Application.ScreenUpdating = True
End Sub
[/vba]
К сообщению приложен файл: 8788398.xlsm(14.6 Kb)


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеМожет, так подойдёт для ручного изменения?
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim curs_old, curs
    If Target.Address <> "$A$5" Then Exit Sub
    Application.ScreenUpdating = False
    curs = Target.Value
    Application.EnableEvents = False
    Application.Undo
    curs_old = Target.Value
    Target.Offset(, 3) = 1 - curs_old / curs
    Target.Value = curs
    Target.Offset(, 1) = curs_old
    If curs >= curs_old Then Target.Interior.Color = vbGreen Else Target.Interior.Color = vbRed
    Application.EnableEvents = True
    Application.ScreenUpdating = True
End Sub
[/vba]
а для обновления по формуле примерно так
[vba]
Код
Private Sub Worksheet_Calculate()
    Dim curs_old, curs
    Application.ScreenUpdating = False
    curs = [A5].Value
    Application.EnableEvents = False
    Application.Undo
    curs_old = [A5].Value
    [A5].Offset(, 3) = 1 - curs_old / curs
    [A5].Formula = "=Лист2!B4"
    [A5].Offset(, 1) = curs_old
    If curs >= curs_old Then [A5].Interior.Color = vbGreen Else [A5].Interior.Color = vbRed
    Application.EnableEvents = True
    Application.ScreenUpdating = True
End Sub
[/vba]

Автор - Pelena
Дата добавления - 10.02.2018 в 17:39
ИгорьЛеонидов Дата: Воскресенье, 11.02.2018, 14:46 | Сообщение № 6
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Pelena,

Обновление по формуле не фурычит. Один раз посчитает и потом глухо.

И хотелось бы работать с диапазоном измерений.


Сообщение отредактировал ИгорьЛеонидов - Воскресенье, 11.02.2018, 14:52
 
Ответить
СообщениеPelena,

Обновление по формуле не фурычит. Один раз посчитает и потом глухо.

И хотелось бы работать с диапазоном измерений.

Автор - ИгорьЛеонидов
Дата добавления - 11.02.2018 в 14:46
Pelena Дата: Воскресенье, 11.02.2018, 14:55 | Сообщение № 7
Группа: Модераторы
Ранг: Местный житель
Сообщений: 12907
Репутация: 2843 ±
Замечаний: 0% ±

Excel 2010, 2016 & Mac Excel
К сожалению, проверить не могу, Ваш файл у меня не обновляется. Про диапазон измерений не поняла


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеК сожалению, проверить не могу, Ваш файл у меня не обновляется. Про диапазон измерений не поняла

Автор - Pelena
Дата добавления - 11.02.2018 в 14:55
ИгорьЛеонидов Дата: Воскресенье, 11.02.2018, 15:09 | Сообщение № 8
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Pelena, Попробуйте вот этот файл.
Там диапазон цен который обновяется. И к каждой ячейке нужно менять цвет и проценты
К сообщению приложен файл: 10.xlsm(25.9 Kb)


Сообщение отредактировал ИгорьЛеонидов - Воскресенье, 11.02.2018, 15:10
 
Ответить
СообщениеPelena, Попробуйте вот этот файл.
Там диапазон цен который обновяется. И к каждой ячейке нужно менять цвет и проценты

Автор - ИгорьЛеонидов
Дата добавления - 11.02.2018 в 15:09
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Как отследить изменение в ячейке? (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс цитирования
© 2010-2018 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!