Я пытаюсь установить формат даты как «гггг / м / д», но получаю ошибку времени выполнения «-2147417848 (80010108)»: сбой метода «Значение» объекта «Диапазон»
Ниже приведено мой код:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim dateValue As String
Dim technicalName As String
'If Target.Cells.Count > 1 Then Exit Sub
technicalName = getTechnicalName(Cells(1, Target.Column).Value)
If (InStr(technicalName, "{{Date}}") And IsDate(Cells(Target.row, Target.Column).Value)) Then
dateValue = Cells(Target.row, Target.Column).Value
Cells(Target.row, Target.Column).Clear
dateValue = Format(dateValue, "yyyy/m/d")
Debug.Print dateValue
Cells(Target.row, Target.Column).Value = dateValue
End If
End Sub
Код не получается в строке: - Cells(Target.row, Target.Column).Value = dateValue
Любая помощь будет очень признательна. Самое смешное, что он работает в некоторых системах с одинаковой версией Excel