Could you please help. Why the code below gives an error 13.
Thank you for your help.Sub add_offsets() Dim rng As Range With Range("F1:F34") Set rng = .SpecialCells(xlCellTypeBlanks) If Not rng Is Nothing Then rng.Value = rng.Offset(, -4).Value + rng.Offset(, -3).Value End With End Sub