Значение ячейки не будет обновляться

Question

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

Я пробовал различные способы его обновления, но ни один из них не будет работать.

    MyCellValue = ActiveCell.Offset(0, 1).Value
    MyCellValue = MyCellValue + ct1
    ActiveCell.Offset(0, 1).Value = MyCellValue

ct1 - единичное, а фактическое значение - 7,5, MyCellValue - единичное, ActiveCell.Offset (0, 1). Первоначально значение равно 0. Формат ячейки: Число, два десятичных знака

Answer 1

ActiveSheet.EnableCalculation = True

Приложение. Расчет

Или что-то более конкретное / целевое, например

Рабочие ( "Лист1") UsedRange.Columns ( "A: C"). Вычислить

.

* Источник: 1010 * https://docs.microsoft.com/en-us/office/vba/api/excel.worksheet.calculate(method)