update,

armandarmand/task1/task1-ticket1/helloworld/browser/hello-aastock-draft1/WritePERatioExpected.bas

@@ -0,0 +1,16 @@
+Attribute VB_Name = "WritePERatioExpected"
+Option Explicit
+
+Function run(row as integer, content as string)
+  On Error GoTo eh
+  Worksheets(TARGET_SHEET).Range(COL_P_E_RATIO_EXPECTED & CStr(row)).Value = content
+  
+Done:
+  exit Function
+
+eh:
+  debug.print "WritePERatioExpected"
+  debug.print row
+  debug.print content
+
+End Function