Attribute VB_Name = "Write_50DayMovingAverage" Option Explicit Function run(row As Integer, content As String) On Error GoTo eh Worksheets(TARGET_SHEET).Range(COL_50_DAY_MOVING_AVERAGE & CStr(row)).Value = content Done: Exit Function eh: Debug.Print "Write_50DayMovingAverage" Debug.Print row Debug.Print content End Function