Использование функции Sum в формуле для добавления различных типов данных

Question

Я пытаюсь, чтобы ячейка (32,1) имела формулу, которая суммирует диапазон ячеек, включая целые числа и даты (пример ниже). Тем не менее, я получаю ошибку несоответствия типов во время выполнения. Как мне исправить строку формулы? РЕДАКТИРОВАТЬ: пробовал решение urdearboy, но ячейка теперь оценивается в #NAME? ошибка на листе Excel. Отображаемая формула: = SUM («A30»: «A31»). Как только я уберу апострофы, проблема исчезнет. Как я могу манипулировать кодом VBA, чтобы он не печатал апострофы?

Range(Cells(30, 1), Cells(30, 1)).Value = DateValue("Jan 19, 2020")
Range(Cells(31, 1), Cells(31, 1)).Value = 10
Range(Cells(32, 1), Cells(32, 1)).FormulaR1C1 = _
    "=SUM(" & Range(Cells(30, 1), Cells(31, 1)) & ")"

Answer 1

Вам необходимо указать адрес

---

Range("A30").Value = DateValue("Jan 19, 2020")
Range("A31").Value = 10

Range("A32").Formula = "=SUM(" & Range("A30:A31").Address(False, False) & ")"