update,

armandarmand/task1/task1-ticket1/helloworld/browser/hello-etnet/WriteStockName.bas

@@ -0,0 +1,17 @@
+Attribute VB_Name = "WriteStockName"
+Option Explicit
+
+Function run(row As Integer, content As String)
+  On Error GoTo eh
+  Worksheets(TARGET_SHEET).Range(COL_STOCK_NAME & CStr(row)).Value = content
+  
+Done:
+  Exit Function
+
+eh:
+  Debug.Print "WriteStockName"
+  Debug.Print row
+  Debug.Print content
+
+End Function
+