Я пытаюсь отладить мой код, который в основном вставляет формулу.однако в строке формулы есть ошибка.Вы можете помочь мне отладить это.он говорит
ошибка 1004 «Ошибка приложения или объекта»
For Each c In ActiveSheet.UsedRange.Columns("F").SpecialCells(xlCellTypeVisible)
If c.Value = "Max" Then
c.Offset(0, 3).Formula = "=concatenate(concatenate(left" & c.Address(False, False) & ",3)" & ",""-""," & "right(" & c.Address(False, False) & ",3))" & ","":""," & c.Offset(0, 1).Address(False, False) & ")"
end if
next