Изя Штельман
Изя Штельман Ответы на вопросы
03 мая 2019, 10:45

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

Вопрос по ЭКСЕЛю: максимальное значение.
17 Комментариев
  • Андрей К
    03 мая 2019, 11:45
    макрос надо написать, который будет срабатывать на изменение данных на листе и проверять, если в ячейке обновилось значение и оно больше А2, то записываем в А2 новое значение
  • Андрей К
    03 мая 2019, 11:55
    У меня в линуксе екселя нет. Но вот примерно так должно выглядеть, наверняка с первого раза не запустится, но ход мыслей примерно таков


    В А2 вбейте только 0, чтобы не заглючило сходу
  • 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

Активные форумы
Что сейчас обсуждают

Старый дизайн
Старый
дизайн