У меня есть пользовательская форма с двумя текстовыми полями, одно текстовое поле (называемое TextBox1
) вводится для дней, а другое текстовое поле (называемое TextBox2
) — для времени.
Я хотел бы добавить дни и время к начальной точке 01/01/2022 00:00:00
.
Например:
TextBox1 = "5"
TextBox2 = "10:00:00"
Я хотел бы добавить один день (значение TextBox1
) к начальному дню, который фиксирован (01/01/2022 00:00:00
).
Я использую следующую формулу:
Range("A1").Value = DateAdd("d", Me.TextBox1.Value, "01/01/2022 00:00:00" + Me.TextBox2.Value)
Я ждал 06/01/2022 10:00:00
.
Это дает мне ошибку несоответствия типа.
Используйте DateTime, а не текст:
Range("A1").Value = DateAdd("d", Val(Me.TextBox1.Value), DateSerial(2022, 1, 1) + TimeValue(Me.TextBox2.Value))
Спасибо большое, уже 4 часа мучаюсь, перепробовав все возможные способы.
строка "5" не совпадает с числом 5. DataAdd ожидает, что второй параметр будет числовым.