Вопрос по ЭКСЕЛю: максимальное значение.

эксель

Изя Штельман

Краснодар

2 037

с 20 января 2019

17 Комментариев

Изя Штельман
03 мая 2019, 10:45
В ячейке А1 автоматически меняются цифры. Например, 100, 101, 90, 95 и т.д. Необходимо в ячейку А2 внести максимальное значение. В данном примере 101. В дальнейшем, если значение будет больше 101, например 102, то внести 102.
Функция =МАКС не подходит, так как используется 1 ячейка, а не их множество. Подскажите, какой функцией или макросом можно решить данную задачу. Заранее спасибо.
0
- Blacky
  03 мая 2019, 12:20
  Изя Штельман,
  Форумом не ошиблись?
  0
  - Андрей К
    03 мая 2019, 12:40
    Blacky, прикладные трейдингу задачи =)
    0
    - Blacky
      03 мая 2019, 16:26
      Андрей К,
      Его элементарная задача ничего общего с трейдингом не имеет ;)
      0
      - Андрей К
        03 мая 2019, 16:44
        Blacky, то что спросил авто, достаточно частая задача в трейдинге, пусть уж спросит тут
        0
        Blacky
        03 мая 2019, 16:53
        Андрей К,
        Это общая задача, которую можно решить на спецфоруме. Вопрос в том, зачем засорять ленту всякой фигней…
        0
        Андрей К
        03 мая 2019, 17:01
        Blacky, ну ладно, вы меня перебубнили =))
        0
        Blacky
        03 мая 2019, 17:17
        Андрей К,
        Да не было цели перебубнить ;)
        
        Просто вот, например, прикладная трейдерская задача: https://smart-lab.ru/mobile/topic/537117/
        
        А то, что спросил автор этого топика… нет слов…
        0
  - Изя Штельман
    03 мая 2019, 13:18
    Blacky, Нет. Я за своими бумагами слежу с помощью экселя. Вывожу данные из квика через DDE, а формулы и фильтры показывают мне нужные результаты. Я уверен в том, что многие здесь работают с экселем.
    0
    - Blacky
      03 мая 2019, 16:20
      Изя Штельман,
      Ошиблись, потому что по экселю есть свой форум (и не один), на котором можно решить любую прикладную задачу.
      0
Андрей К
03 мая 2019, 11:45
макрос надо написать, который будет срабатывать на изменение данных на листе и проверять, если в ячейке обновилось значение и оно больше А2, то записываем в А2 новое значение
0
Андрей К
03 мая 2019, 11:55
У меня в линуксе екселя нет. Но вот примерно так должно выглядеть, наверняка с первого раза не запустится, но ход мыслей примерно таков

В А2 вбейте только 0, чтобы не заглючило сходу
+1
AG_269
03 мая 2019, 12:52
можно вот так:

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets(«Sheet1»)

'MsgBox ws.Cells(1, 1).Value

If ws.Cells(1, 1).Value > ws.Cells(1, 2).Value Then
ws.Cells(1, 2).Value = ws.Cells(1, 1).Value
End If

End Sub
0